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Un faux compatible est un poison! 
voici l’antidote: 


Ton abondance, 

Ton TURBO, 

Ton DOS +, ton GEM 
Ton TURBO-PASCAL. 
Ton PRIX 
... JE CRAQUE ! 


TRAN - 53, impasse Blériot, 83130 LA GARDE 

Tél. 94.21.19.68 


























NOUVEAUTÉ- 

DES COMPATIBLES PC A MOINS 
DE 4.000F HT C’EST UNE RÉALITÉ 

avec la nouvelle gamme d’ordinateurs complets 

JASMIN TURBO HQ de T.R.A.N. 


Jasmin Turbo 
en hypermarché 

J'ai été merveilleusement surpns de trou¬ 
ver des « JASMIN TURBO >• dans un 
hypermarché. Avec son look « AT » et 
sa clé « anti-reset ». il fait vraiment pro¬ 
fessionnel Mais que fait-il dans un hyper¬ 
marché, ce compatible IBM PC/XT ? 
Quand j'a vu le prix, j'a compris ! Il com¬ 
mence à 3.954,47 F Hors Taxes pour 
256 K de mémoire vive (RAM) Mas c'est 
le prix d'un bon micro-ordinateur fami¬ 
lial ! C'est difficile de résister et, ben sûr. 
je me suis même laissé tenter par un 
modèle supérieur à deux lecteurs de dis¬ 
quettes et 640 K RAM à 6.224.29 F H T 
Surtout, je connais bien la société fran- 
çase T.R.A.N. à travers sa famille de lec¬ 
teurs JASMIN, ben appréciés des ORI- 
CIENS et des AMSTRADIENS 

De bonnes surprises 

6.224 F, c'est déjà un très bon prix pour 
un compatible PC classique de même 
capacité, mais quand j’enlève l'embal¬ 
lage, quelle découverte ! Le langage 
structuré le plus vendu au monde, le 
TURBO PASCAL de Borland avec son 
manuel, les systèmes d'exploitation DOS 
PLUS et GEM de D.R.I. avec le guide 
et les licences officielles. L'ensembe de 
ces logiciels coûte à lui seul plus de 
2.000 F. Encore une autre découverte 
une souns de haute précision dont le prix 
est d'au moins 1.000 F Surtout, l'unité 
centrale contient déjà : 

— la carte-mère équipée de 640 K de 
RAM. du microprocesseur 8088-2, d'un 
emplacement prévu pour le rajout du co¬ 
processeur arithmétique 8087 et de 8 
ports d'extension à connecteurs longs ; 

— la carte 16 couleurs et graphique 
appelée aussi la carte CGA avec une sor¬ 
tie vidéo composite couleur, une sortie 
vidéo N. et B., une sortie RVBI. une inter¬ 
face crayon optique ; 

— la carte « MULTI I/O » comprend deux 
ports séné dont un équipé, une interface 
imprimante parallèle Centronic. une en¬ 
trée manette de jeu, une horloge/calen¬ 
drier permanent sauvegardée par bat- 
tene, le contrôleur pour deux lecteurs de 
disquette. 


Et il reste encore 6 ports d'extension dis¬ 
ponibles Sa généreuse alimentation à 
découpage de 150 W ventilée réside 
dans l'unité centrale et non dans le moni¬ 
teur. ce qui permet une évolution sans 
soucis de la configuration du système, 
par exemple changer de moniteur sui¬ 
vant ses besoins 

La double vitesse, clé 
de la vraie compatibilité 

On connaît ben les problèmes que 
posent les ordinateurs qui ne fonction¬ 
nent qu'en 8 MHZ avec des logiciels 
écrits pour du 4.77 MHZ. vitesse de l'IBM 
PC Or. JASMIN PC est un TURBO à 
doube vitesse 8MHZ et 4.77 MHZ com- 
mutabe au clavier C'est indispensable 
pour une vraie compatibilité 
Mis en garde ces derniers temps de la 
mauvaise compatibilité de certains clo¬ 
nes. j'ai tout de suite testé avec « Corn- 
patest » et MS-DOS Le résultat m'a bus 


que rassuré : 98 % en compaüblité pon¬ 
dérée et 3* niveau de compatiblité. Et. 
jusqu'à ce )Our. je n'ai pas encore trouvé 
de logiciel pour IBM PC qui ne fonctionne 
pas sur le JASMIN TURBO 

Systèmes d’exploitation 

J ai apprécié le choix du système 
d'exploitation DOS PLUS de Digital 
Research Inc . pour sa double compa- 
tiblité avec le système MS DOS 2-11 et 
CP/M 86 Vive les transferts de fichiers 
entre les deux standards. 

Le système d'exploitation d'environne¬ 
ment graphique GEM (Graphie Envi¬ 
ronment Manager) de DRI est livré avec, 
ce qui permet à JASMIN TURBO d'uti¬ 
liser toute apb'cation écrite sous GEM. 
toute application écrite sous GEM. dis- 
pombe sur le marché Par exemple, le 
GEM-DESKTOP (pour BUREAU) per¬ 
met d utiliser le JHASMIN TURBO avec 
des Icônes comme un Macintosh. La 
convivialité avant tout 


Gamme JASMIN TURBO HQ : 

HQ pour Haute Qualité. Chaque modèle est équipé d offee d une carte TURBO, 
des cartes <• CGA » et •> Multi I/O ». du clavier AZERTY de bonne qualité avec 
indicateurs lumineux et dun lecteur de disquettes 5 "1/4 Chacun est accom¬ 
pagné de DOS-PLUS. GEM et TURBO/PASCAL 
HQ CLUB : 256 K RAM extensible à 640 K - 
alimentation allégée - DOS PLUS - 

TURBO PASCAL - 1 lecteur 5 "1/4. 3.954,47 F HT 

HQ 2 640 K RAM - Souris - DOS PLUS - 

GEM - TURBO PASCAL 

Alimentation 150 W - 2 lecteurs 5" 1/4 6.224,29 F HT 

HQ 10 540 K RAM - Souris - DOS PLUS- 

GEM - TURBO PASCAL - Alimentation 150 W - 
1 lecteur 5" 1/4 - 1 disque DUR 10 MB 8.001,69 F HT 
HQ 20 640 K RAM - Souns - DOS PLUS - 

GEM - TURBO PASCAL - Alimentation 150 W • 

1 lecteur 5 "1/4 - 1 disque DUR 20 MB 9.915,69 F HT 

Le moniteur monochrome 12'' haute résolution est proposé à 758,85 F HT. 
Le moniteur couleur 14" haute définition ; 3.279,93 F HT 

Où trouver les JASMIN TURBO ? 

Dans les EUROMARCHES de MULHOUSE, BELFORT. NANCY, MARSEILLE, 
LYON. NIMES. TOULON, NICE. PERPIGNAN, THIERS, AIX-EN-PROVENCE, 
chez VCB2-GARONOR Tél 48.67 6601, D F.l PARIS Té) 4288 14.97. MICRO¬ 
CLUB BOBIGNY Tél. 48.31.69 33. dans les points de vente JASMIN et aussi direc¬ 
tement chez T R AN.. 53, impasse Blénot, 83130 LA GARDE - Tél 94 21 1968 


IBM PC/XT sont des Marques Déposées de international Business Macnme Corporation DOS PLUS • GEM sont des Marques Déposées de DIGITAL RESEARCH INCORPORATION 
AMSTRAD PC es! une Marque Déposée d AMSTRAD TURBO PASCAL est une Marque Déposée de BORLAND INTERNATIONAL JASMIN TURBO est une Marque Déposée de T R A N 

La Société T R A N se réserve le droit de modifier toute spécification sans préavis 
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Une ligne téléphonique est à votre disposition, vous met¬ 
tant en contact direct avec la rédaction. Ceci est un ser¬ 
vice sans égal ! Respectez simplement les horaires et les 
jours que nous vous indiquons : 

MERCREDI de 9 h à 12 h et de 14 h à 17 h. 
VENDREDI de 9 h à 12 h seulement. 

Tout appel en dehors de ces créneaux sera refoulé ne 
dépensez pas inutilement votre argent ! 


Le numéro 


99 . 52 . 98 . 11 . 
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Intérêt soutenu sur notre bon vieil ORIC... Telle est la pre¬ 
mière conclusion qui puisse être tirée des quelque 700 
réponses reçues à notre sondage (dont 525 parvenues en 
date du 15 septembre). Vif soutien également à la revue 
THEORIC avec de nombreux encouragements : ne vous 
inquiétez pas, on ne vous laissera pas tomber ! 

La nouvelle est tombée une semaine avant le bouclage : 
ORIC International rentre en bourse. D'après l'analyse de 
leurs résultats financiers, il semblerait que le TELESTRAT 
puisse partir d'un bon pied. 

Quant à TRAN, le fabricant du célèbre Jasmin, il change 
son fusil d'épaule et propose un compatible IBM PC à un 
prix défiant toute concurrence. Peut-être pour assurer une 
suite logique à ceux qui ne se satisfont plus de leur petit 
ORIC ? 


La Rédaction 


ORDIELEC 

19, rue Hippolyte Flandrin 
69001 LYON 
Tél. 78.27.80.17 

Par minitel de 12h15 à 14h00 
et de 19h30 à lOhOO à ce même numéro 

SPÉCIALISTE ORIC 

Démonstration Telestrat 
en permanence 
Composants connectlque 
et cables. 


COMMANDE ANCIENS NUMEROS 



(valable jusqu'à épuisement des stocks) 


Numéros 6 à 21 . 30 F pièce 

Numéros 11 (Hors Série), 22 et suivants .... 25 F pièce 


ATTENTION : NUMERO(S) EPUISE(S) : 1. 2, 3, 4, 5, 8 

NOM .Prénom . 

Adresse . 

Code Postal .Ville . 


Frais de port : 7,10 F pour 1 revue 
10,30 F pour 2 revues 
14,60 F pour 4 revues 
21,00 F au dessus 


|Ci-joint, chèque bancaire ou postal de 
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COURRIER 


M. SARLIN 
13 VITROLLES 

Auriez-vous une solution à propo 
ser pour faire fonctionner le 
magnétophone spécial ORIC ? 
Hélas, trois fois hélas... Ce genre 
de magnétophone, que l'on 
trouve à certains endroits pour 

I 50 F. n'est absolument pas fia 
ble. Outre les problèmes "électro 
niques'', des ennuis mécaniques 
sont à craindre : rupture des tou 
ches (la rédaction en sait quelque 
chose), défilement peu régulier. 

II vaut mieux choisir d'autres 
modèles, peut-être un peu plus 
chers, mais donnant de bien meil 
leurs résultats. Pour ceux qui 
voudraient assortir les couleurs 
du magnéto à celles de l'ATMOS. 
signalons qu'il existe chez Phi- 
lips/Radiola un modèle qui donne 
de très bons résultats avec 
l'ORIC. 

Le modèle CCR81, vendu dans 
les magasins Tandy, est égale¬ 
ment très fiable, mais la liste 
n'est pas limitative... Un même 
modèle fabriqué par Pathé Mar 
coni, Continental Edison, Thom 
son, sous de formes un peu dif¬ 
férentes, et vendu avec son bloc 
alimentation secteur environ 
450 F, donne de très bons résul¬ 
tats. Qui plus est, n'étant pas un 
modèle "spécial informatique", il 
peut être employé pour d'autres 
applications. 

■ ■ ■ 

Philippe LAFORGUE 
92 VAUCRESSON 


Henri RICHAUD 
13 VENELLES 

J'ai créé un logiciel permettant de 
tracer sur écran un ordino¬ 
gramme mais, comment sauve¬ 
garder sur disquette la page 
écran ? 

C'est extrêmement simple puis 
que, sur ORIC, on sauvegarde la 
page écran comme une simple 
zone mémoire. Sur cassette, cela 
donnerait CSAVE "ECRAN", 
A # A000, E # BF3F. Sur disquette 
Jasmin, la syntaxe diffère légère 
ment : !SAVE"ECRAN.BIN, 
#A000, #BF3F" ou à l aide de 
la commande spécifique 'HSCR 
ECRAN SCR". 


Eric SOHIER 
94 SUCY-EN BRIE 

Sur mon THEORIC n° 22, les 
pages 20, 21... 28, 29 n'ont pas 
été imprimées. Pour rais-je en 
avoir des photocopies ? 

Il arrive (les imprimeurs ont droit 
à un certain taux de déchet) que 
des numéros de THEORIC soient 
mal imprimés. Dans ce cas, il suf¬ 
fit de nous retourner la revue 
défectueuse et nous l'échange¬ 
rons, en supportant les frais de 
port. Ceci est tout-à-fait normal... 

■ ■ ■ 

Roland BERT 
69 OULLINS 

Combien peut-on mettre d'exem¬ 
plaires de THEORIC dans une 
reliure ? 

Les reliures sont conçues de telle 
sorte qu'il n'est pas nécessaire 
d'ôter les couvertures de la 
revue. Une douzaine d'exemplai¬ 
res peuvent y tenir sans aucun 
problème. 

□ □ □ 

RECHERCHE 
DE CORRESPONDANTS 


J'ai essayé de me connecter au 
serveur THEORIC, sans succès... 
Nous l'avons annoncé dans 
THEORIC : ce serveur expérimen¬ 
tal monovoie a été arrêté après 
trois mois. N'essayez plus d'ap- 
peler ! Par contre, vous pouvez 
consulter les petites annonces et 
le sommaire du prochain THEO 
RIC sur le serveur TDC, par le 
3615 code d'accès MHZ. 


L'ORIC n'a pas eu le même suc¬ 
cès en Angleterre qu'en France 
et, maintenant que ORIC UK a 
fermé ses portes, il reste là bas 
bon nombre de passionnés. Mar 
tin BATEMAN recherche des cor 
respondants français. 

Voici son adresse : 

121 COPPICE WAY - THE COP 
PICE AYLESBURY BUCKS HP 
20 IXQ - England. 


Lucien GARDES 
77 SUCY-EN BRIE 

Nous demande de lever le doute 
sur une ambiguïté de la publicité 
concenrant le TELESTRAT. 

Il est dit, dans la publicité d'EU- 
REKA concernant le TELESTE 
RAT, que cette machine peut 
accepter tous les programmes 
créés pour l'ORIC-1 et l'ATMOS 
( "100 % compatible avec toutes 
les cassettes ORIC 1 ou ATMOS 
et avec les disquettes non proté 
gées '). La question nous a été 
posée plusieurs fois, par écrit 
comme au téléphone. Il nous faut 
donc éclaircir le lecteur sur ce 
point. Le TELESTRAT, avec la 
dernière version de l'Hyperbasic 
(V. 1 32), permet de relire des 
fichiers ATMOS sur cassette et 
de les transférer sur disquette 
sous STRATSED. Par contre, cela 
suppose que les programmes ne 
soient PAS PROTEGES, donc il 
n'est pas possible d'utiliser tous 
les programmes commercialisés. 
Aussi, si vous désirez utiliser tous 
vos meilleurs jeux, vous devrez 
faire l'acquisition de la ROM 
ATMOS en cartouche. Dans ce 
cas, votre TELESTRAT n'est, ni 
plus, ni moins qu'un... ATMOS ! 
L'Hyperbasic et les anciennes 
versions du Basic ne sont pas 
compatibles... et pour cause, la 
puissance du nouveau langage 
n'a rien à voir avec celle de l'an¬ 
cien. 

□ □ □ 

Michel LOUIS 

Pourriez-vous m’indiquer, claire¬ 
ment, la procédure à suivre pour 
obtenir le démarrage automati¬ 
que, lors du BOOT, d’un pro¬ 
gramme JASMIN ? 

Le lancement automatique d'un 
programme est possible sur le 
TDOS. D'ailleurs, le manuel utili¬ 
sateur indique la marche à suivre. 
Voici comment il faut procéder : 
Préparer (formatage et initialisa 
tion) une disquette sur laquelle se 
trouvera le programme. 

Le programme doit être en 
mémoire dans l'ORIC. Il doit obli¬ 
gatoirement contenir, dès ses 
premières lignes si possible, les 
instructions suivantes : 

ATMOS : DOKE #1B,#CCB0 
ORIC-1 : DOKE # IB. # CBED 
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Faire ensuite ISTART "P.BAS". 
Il est indispensable de donner un 
nom de programme en une seule 
lettre. 

Faire alors IIVIASTER "TDOS. 
SYS" pour implanter le DOS sur 
la disquette. 

Sauvegarder enfin par ISAVE "P. 
BAS" le programme sur la dis¬ 
quette. 

A chaque BOOT, le programme 
P se lancera automatiquement. 

NE TELEPHONEZ PAS 
N'IMPORTE QUAND ! 

Vous pouvez joindre les Editions 
SORACOM (revues THEORIC, 
CPC, AMSTAR, MEGAHERTZ) 
au numéro 99.52.98.1 1. Par 
contre, n'appelez pas n'importe 
quand : 

Pour une question d'ordre 
technique, concernant le contenu 
des revues, appelez le mercredi 
de 9 h à 12hetde 14hà 17h 
ou le vendredi de 9 h à 12 h. 

— Si c'est un problème d'ordre 
administratif, appelez-nous en 
dehors des créneaux horaires 
cités ci-dessus. 

En règle générale, évitez de télé¬ 
phoner si vous n'êtes pas muni 
de toutes les informations 
concernant votre commande ou 
abonnement. 

Ne téléphonez pas, non plus, 
pour connaître la date de la fin de 
votre abonnement : celle-ci est 
indiquée sur l'étiquette informa¬ 
tique qui accompagne votre men¬ 
suel. Vous y trouvez : votre 
numéro d'abonné, le 1 er numéro 
de la revue qui vous a été servie, 
le dernier numéro que vous allez 
recevoir. 

Pour éviter une possible rupture 
dans le service de la revue et bien 
qu'une lettre de relance vous 
informera de la fin de votre abon¬ 
nement, n'attendez pas le dernier 
moment pour le renouveler. 


■"N® d'abonné' 

''Fin'' 

d'abonnement 

1 

"Début" 1 

Jr 

N \ 

9876/TU 

23/33 

CLAVIER 

Hi larion 

12, Rue 

des Ecrans 

‘15789 DISQUE sur LOIRE 



"JOURNEES 

INFORMATIQUES" 

Nous avons le plaisir de vous faire 
savoir que les 2 e Puces Informa¬ 
tiques organisées par notre club 
se tiendront le dimanche 30 
novembre 1986 à la mairie 
annexe du Pradet, près de Tou¬ 
lon. 

A cette occasion, les particuliers 
pourront acheter, vendre ou 
échanger tous logiciels ou maté¬ 
riels informatiques. 

Pour tout renseignement, contac¬ 
ter Association Pradet Informati¬ 
que, Hôtel de Ville, 83220 LE 
PRADET. 



NOUVELLE RUBRIQUE 

Nous allons tenter de resserrer 
davantage les liens entre lecteurs 
et auteurs, au moyen d'une nou¬ 
velle rubrique, qui ne vivra que si 
vous l'alimentez ! 

Les premiers dépouillements sur 
le sondage, auquel bon nombre 
d'entre vous avez bien voulu 
répondre, tentent à prouver que 
THEORIC pourrait être encore 
plus complet... On nous suggère 
donc d'exposer les besoins des 
lecteurs pour inciter les auteurs 
à y répondre, d'où la question 
suivante : 

Quels sont les sujets (articles ou 
logiciels) que vous aimeriez voir 
traités dans la revue ? Notre pre¬ 
mière réponse est sous la forme 
d'une série d'articles sur les 
fichiers, rédigée par M. VASILJE- 
VIC, un de nos collaborateurs. 
N'hésitez pas à remplir la boîte à 
suggestions : elle est désormais 
ouverte ! 

OO 

SONDAGE THEORIC 

Vous avez été très nombreux à 
répondre à ce second sondage. 
Le dépouillement et l'analyse 
complète de vos réponses ris¬ 


quent d'être assez longs. Nous 
reviendrons dessus, point par 
point car, grâce à votre participa¬ 
tion, il nous est désormais pos¬ 
sible de cerner, avec une plus 
grande précision, le profil des lec¬ 
teurs de THEORIC. 



REDACTEURS, 

A VOS PLUMES ! 

Nous récherchons des collabora¬ 
teurs capables d'écrire des arti¬ 
cles dans THEORIC (initiation ou 
perfectionnement), surtout sur 
des sujets concernant le TELE- 
STRAT. N'hésitez pas à nous 
contacter si vous désirez faire 
profiter l'ensemble des lecteurs à 
vos travaux. Tél. 99.52.98.11, 
demander Denis BONOMO. 

OO 

TRAVAIL EN GROUPE 

Une idée très originale nous a été 
suggérée par Jean-Claude BEN¬ 
HAIM. Elle consistait à constituer 
une équipe de travail autour d'un 
thème, chargée de développer un 
logiciel. Nouvelle motivation, 
peut-être, pour tous ceux qui ont 
envie de "faire quelque chose", 
mais ne savent pas quoi ! 
Chacun se verrait investi de la 
responsabilité du développement 
d'un module de programme, en 
fonction de ses compétences. La 
rédaction de THEORIC se charge¬ 
rait d'assurer coordination et 
sélection des travaux. 

Les thèmes ? A voir directement 
en fonction de la "boîte à sugges¬ 
tion" qui sera alimentée par nos 
lecteurs. 

S'il vous plairait de participer aux 
travaux de ces équipes de recher¬ 
che, faites-vous connaître auprès 
de la rédaction de THEORIC. 


AVEZ-VOUS 

LA 

COLLECTION 

COMPLETE 

DE 

THEORIC ? 

BON DE COMMANDE PAGE 3 
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SERVEURS TELESTRAT 

Voici quelques numéros de ser¬ 
veurs utilisant le TELESTRAT. 
Humour, jolies pages de présen¬ 
tation ou simplement caractère 
utilitaire y sont présents. 

Si vous avez conçu un serveur 
répondant à des critères particu¬ 
liers sur un sujet donné, n'hési¬ 
tez pas à contacter la rédaction 
de THEORIC pour un réportage 
éventuel. 


MAIRIE 

MUSIQUE 

ORIC INTERNATIONAL 

MAGASIN INFORMATIQUE 

STE DE SERVICES 

RADIO 

VIDEOTEXTE 

STRAMO'S CLUB 

PARI TURFISTE 

SERVEUR BIGOUDENT 

MICRO BEDE 

TELETIC 


16/31634293 

1/42802292 

1/42812272 

16/35250143 

1/43295535 

16/35660059 

1/43221773 

16/93082844 

1/43559013 

16/98871174 

16/93807628 

16/93855336 


ORIC INTERNATIONAL 
CHERCHE ARGENT FRAIS 

Ce pourrait être le début d'une 
petite annonce. Annonce il y a ! 
La Direction d'ORIC vient de se 
lancer sur le marché de la bourse. 
Fort de son chiffre d'affaires de 
38 millions de francs, ORIC Inter¬ 
national a décidé d'augmenter 
son capital en faisant appel à 
l'épargne public et s'inscrit en 
bourse sur le marché hors cote de 
Paris. 

O O O 

CA BOUGE 

DANS LE SUD-OUEST 

Comme chaque année, l'associa¬ 
tion STAIRWAY MICRODATA 
propose à l'hôtel de ville de Tar¬ 
bes un mini-salon sur l'informa¬ 
tique. 

Baptisé "Journées des Techni¬ 
ques de Pointe”, il aura lieu les 
8, 9 et 10 novembre 1986. 

Au programme, présentation de 
nouveautés (matériels et logi¬ 


ciels), de robots et de systèmes 
experts. 

Une animation permanente sera 
assurée et... il y aura de nom¬ 
breux cadeaux à gagner. 
STAIRWAY MICRODATA, BP 
186, 6500 TARRBES 



ET A PARIS AUSSI ! 

Les 28, 29 et 30 novembre, sont 
à retenir sur votre emploi du 
temps : le 3 e Salon-Rassemble¬ 
ment européen de soldes de la 
micro et de la vidéo se tiendra 
aux Pavillons du Parc Floral de 
Vincennes, de 9h30 à 18h30. 
Pendant ces 3 jours, profession¬ 
nels et passionnés de la micro et 
vidéo se retrouveront pour ven¬ 
dre, acheter ou échanger leurs 
matériels. Le vendredi, la journée 
sera consacrée au matériel pro¬ 
fessionnel. 

Pour tout renseignement sur 
MIDEOCASE, contacter Cathe¬ 


rine MISTLER au (1 ) 46.22.38.60 
au (1) 46.22.39.68. 


MEGAM : 

UNE NOUVELLE PLANETE 

Une nouvelle planète vient d'être 
découverte : MEGAM, la planète 
des drôles de puces. 

C'est le premier espace de loisir 
informatique. Lieu de présenta¬ 
tion de togiciels récréatifs origi¬ 
naux, collectifs, spectaculaires, 
utilisant des combinaisons nou¬ 
velles de technologie de pointe. 
MEGAM, un lieu de rencontres et 
d'événements où vous découvri¬ 
rez les meilleurs jeux sur micro¬ 
ordinateurs. 

MEGAM est situé au cœur du 
Parc de la Villette. 

Grande Halle, Studio 2 
211, avenue Jean Jaurès 
75019 PARIS 

Ouvert de 1 2h30 à 18h30 tous 
les jours sauf le lundi. Prix d'en¬ 
trée : 25 F. 


BOITE A 


SUGGES 

TIONS 


Une nouvelle rubrique voit le jour. 
Son but ? Inciter les program¬ 
meurs indécis à travailler sur un 
sujet donné, pour le plus grand 
bien de l'ensemble des lecteurs. 


PREMIERE SUGGESTION 

Qui veut se lancer dans la réali¬ 
sation d'une instruction de type 
ON ERROR... GOTO ou encore 
ON ERROR... GOSUB ? Nos 
ORIC-1 et ATMOS seraient très 
satisfaits ! 



DEUXIEME SUGGESTION 

Qui pourrait être un travail de 
groupe : une gestion de fichier 
pour SEDORIC, rapide et com¬ 
plète. Un peu le MULTIFICH du 
Jasmin, quoi ! Là, l'objectif est 
plus difficile à atteindre... 

TROISIEME SUGGESTION 

Un affichage 80 colonnes réalisé 
par déplacement horizontal, uti¬ 
lisant l'écran un peu comme une 
fenêtre. En Basic, c'est faisable 
mais assez lent, alors pourquoi ne 
pas essayer en langage machine ? 
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VITRINE DU LOGŒL 


MUSIRAMA 

(Bleu Ciel Informatique) 

Educatif 
140 F 

Ça, c'est bien ! Merci, BLEU CIEL 
INFORMATIQUE, de continuer à 
éditer du logiciel pour nos pau¬ 
vres ORIC... En plus, vous faites 
ça bien ! Si, si, j'insiste car MUSI¬ 
RAMA m'a conquis, moi le pau¬ 
vre ignare en matière de musique 
et, si j'avais l'occasion d'y 
consacrer plus de temps que ce 
court banc d'essai, je suis certain 
que je pourrais en apprendre pas 
mal... En ces temps où le solfège 
ne trouve plus toujours la place 
qu'il faudrait dans les écoles, 
MUSIRAMA peut être mis entre 
les mains des enfants pour leur 
donner quelques rudiments 
d'éducation musicale. 


La musique, c'est d'abord les 
sons. MUSIRAMA se chargera de 
vous dévoiler tous les secrets 
contenus dans les notions de fré¬ 
quence, période, hauteur, batte¬ 
ment, modulation, enveloppe, 
etc. Quand les sons s'assemblent 
de manière harmonieuse, on peut 
commencer à parler de musique. 
Là, il faut définir les termes de 
gamme, octave, mesure, mouve¬ 
ment, altérations, etc. 

Toutes ces tâches sont fort bien 
remplies par le logiciel. La réali¬ 
sation est soignée. Les textes 
sont exempts de fautes de fran¬ 
çais et d'orthographe et, quand 
il le faut, ils sont émaillés d'illus¬ 
trations graphiques et sonores. 
Vous pensiez en connaître beau¬ 
coup sur la musique ? Peut-être 
quelques révisions s'imposent- 
elles ? 





BlcüiCÎcl 

infotnuiti 


MUSIRAMA est une bonne réali¬ 
sation dans un domaine où les 
éditeurs ne s'étaient, jusqu'à ce 
jour, que trop peu aventurés. Seul 
le prix pourra sembler un peu 
élevé, mais, à l'usage, vous ne le 
regretterez pas ! 


Il CAPRICORNE 

Sur le plan professionnel, il faudra 
peut-être attendre la fin du mois pour 
voir se débloquer une situation 
complexe qui nécessite une mise au 
point. Du 1" r au 15. votre pro 
gramme ne tourne pas rond. Mais 
comme vous avez de la suite dans 
les idées, vous en viendrez à bout. 
Dans le domaine des sentiments, 
vous ferez en sorte de garder votre 
part de mystère, de ne pas tout 
dévoiler vos émotions. 

VERSEAU 

Mars dans le signe du Verseau, cela 
signifie pour vous dynamisme, acti 
vité intense et même parfois exces 
sive. Vous avez des idées, et vous 
ne manquez pas d'énergie pour les 
réaliser. Mais le surmenage vous 
guette. Attention à la fatigue qui suit 
les heures passées devant l'écran de 
votre système informatique. Prenez 
un peu l'air, et consacrez vous à 
l'amour : le climat affectif est très 
bon. 

POISSONS 

Vous venez de traverser une période 
de remise en question qui vous a fait 
redéfinir vos bases A partir du 10 
novembre, vous prendrez un nou¬ 
veau départ, un élan positif. Faites 
le plein de disquettes, vous allez 
connaître une période de créativité 
En amour, votre comportement est 
parfois étrange. Mais votre caractère 
hors des normes fait aussi votre 
charme. 


ASTROLOGIE 


BALANCE 

Après le départ pris le mois dernier, 
le temps est venu de concrétiser, de 
réaliser vos proiets. Un travail 
d'équipe pourrait s'avérer mdispen 
sable si vous voulez aller jusqu'au 
bout de vos conceptions. En infor¬ 
matique, votre entourage vous don 
nera des idées utiles, des astuces. En 
amour, c'est l'enthousiasme qui fait 
le climat du mois. Vous exercez une 
certaine forme de séduction. 

SCORPION 

Le Soleil se trouve dans votre signe. 
Le mois sera marqué par un dyna¬ 
misme très constructif en ce qui 
concerne la bonne marche de vos 
activités professionnelles. Si vous 
ôtes nôle) entre le 1 •' et le 10 
novembre, ce dynamisme sera pré¬ 
sent jusqu'en novembre 87. malgré 
les fluctuations de votre forme. 
Vénus est dans votre signe. Votre 
ordinateur peut attendre, mais pas 
l’élule) de votre cœur 

SAGITTAIRE 

Le thème qui vous touche le plus ce 
mois ci. c'est la communication. 
Une période riche sur le plan humain 
commence pour vous, avec des ren 
contres et des contacts fructueux à 
la clé. N'oublions pas que l'ordina 
teur est aussi un outil de communi¬ 
cation. Vous devriez vous intéresser 
au Minitel, à le télématique. En 
amour, c'est la franchise qui 
domine . vous dévoilez votre vraie 
nature. 


NOVEMBRE 

CANCER 



Ce mois-ci, vous serez très sensible 
à tout ce qui concerne l'esthétique, 
la beauté, l'équilibre des formes. 
Aussi, votre vie sentimentale a de 
fortes chances de rester au beau 
fixe. Vous vivrez avec vos rêves et 
vos illusions, rien ne devant troubler 
l'harmonie de votre monde intérieur. 
Avec un bon logiciel de dessin ou de 
traitement d'images, votre micro 
sera au diapason de votre sensibilité. 

LION 

Au début du mois, vous ferez preuve 
de détermination et de combativité. 
Vous aurez peut-être un peu de mal 
à faire admettre vos conceptions, 
mais soyez sûr que vous y parvien 
drez. Vous n'aurez pas besoin d'un 
logiciel de jeu sur le thème 'guerre 
des étoiles" pour connaître des 
moments d'exaltation et d'agitation. 
Aussi, en amour, attention aux 
emportements intempestifs. 

VIERGE 

Sur le plan de vos activités profes 
sionnelles comme de vos loisirs, 
avouez que vous n'avez pas beau 
coup avancé ces derniers temps. 
Mais vous avez minutieusement pré¬ 
paré la relance de vos travaux qui 
devrait se produire ce mois-ci. En 
programmation, par exemple, vous 
serez en mesure d'assembler les 
morceaux de votre logiciel, d’en faire 
la synthèse. Dans le domaine senti 
mental, une explication sera cons¬ 
tructive. 


BELIER 

Pour peu qu'une idée nouvelle vous 
séduise, vous savez donner à vos 
activités et à vos loisirs un élan que 
rien ni personne ne peut freiner. Ce 
sera le cas début novembre, mois 
durant lequel vous risquez de délais 
ser vos jeux favoris pour vous 
consacrer exclusivement à votre 
nouvelle passion. En amour, votre 
partenaire pourrait contester cette 
exclusivité et vous réclamer un peu 
plus d'attention. 

TAUREAU 

Vous allez devoir vous adapter à 
votre entourage, tenir compte des 
impératifs de la vie en société. Le 
programmeur est quelque part un 
loup solitaire, mais il doit savoir 
communiquer et présenter à autrui le 
résultat de ses travaux. C’est la 
bonne période pour mettre vos créa 
tions à l’épreuve du jugement de vos 
proches. Si vous êtes seul(e), vous 
avez des chances réelles de rencon 
tre. 

GEMEAUX 

Il y a chez vous un désir d'évasion, 
de dépaysement. Même les jeux 
d’aventure sur votre micro-ordina 
teur favori seront insuffisants pour 
satisfaire votre soif de renouvelle 
ment. Vous vous consacrez à des 
activités mettant en jeu vos qualités 
de mobilité et d'adaptation. Vos rap 
ports seront tendus avec ceux qui 
vous imposent des structures rigi¬ 
des. qui mettent en péril votre indé 
pendance. 
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JASMIN 



Pierre BEAUFILS 


J 'ai lu avec intérêt l'entrefilet paru dans THEORIC il y a 
peu de temps et, comme beaucoup de lecteurs, sans 
doute, |e me suis demandé si l'on n'était pas un premier 
avril. Et bien, non I J'ai vu le Jasmin PC, il existe, et il est depuis 
peu effectivement commercialisé. 


La société Tran a mis à ma dis 
position, pour une quinzaine de 
jours, l'un des premiers exemplai 
res, et je l'ai testé — sans 
complaisance — pour le journal. 
Mais avant, je voudrais répondre 
à un lecteur qui écrivait récem 
ment qu'il ne comprenait pas 
l'engouement soudain des ama¬ 
teurs d'informatique pour les 
nouveautés et que finalement un 
ORIC-ATMOS procurait certaine 
ment autant de plaisir qu'un 
compatible IBM. Je pense qu'il a 
entièrement raison. Mais, 
employant moi-même un 
ATMOS, tant à la maison qu'à 
mon travail (je suis enseignant), 
je me suis aperçu qu'il y avait un 
obstacle infranchissable à ce type 
de micro-informatique : l'absence 
de compatibilité avec le matériel 
de mes voisins ou de mes élè¬ 
ves : Spectrum, Amstrad, QL, 
etc. Le travail important que je 
fournissais avec mon ORIC ne 
pouvait profiter à mes collègues 
et inversement. Idem pour les 
périphériques. 

Or, aujourd'hui, en tant que 
consommateurs, nous pouvons 
imposer un standard. Il faut en 
profiter, et tout le monde sera 
gagnant. Cette chance qui nous 
est offerte, c'est la compatibilité 
IBM PC. Vous trouverez cepen¬ 
dant toujours quelqu'un pour 
vous dire que ce standard est 
démodé, dépassé, mais, rassu¬ 
rez-vous : c'est le jour et la nuit, 
si vous considérez votre vieil 
ORIC et vous aurez d'énormes 
satisfactions. Un dernier point : 
pour une fois, grâce à la concur¬ 
rence, nous payerons un appareil 
son vrai prix, et non un prix en 
fonction du climat ou de la tète 
du client ou des gourmandises de 
l'importateur... 

Revenons-en à Jasmin PC avec 
l’œil d'un Oricien. L'appareil est 
encombrant, très encombrant. Il 
s'agit d'un coffret métallique 
dont le dessus s'ouvre et donne 
accès à l'intérieur. Là, tout est 
propre et vous y découvrirez le 
secret de la norme IBM-PC. Ce 
sont les slots, qui ont fait la 
richesse d'Apple. Qu'est-ce 
qu'un slot ? Il s'agit d'un connec¬ 
teur, dans lequel on peut insérer 


une carte électronique, réalisant 
une fonction particulière. D'ori¬ 
gine, deux cartes multifonctions 
sont fournies et vous offrent tou¬ 
tes les possibilités de branche¬ 
ment : sortie parallèle (pour une 
imprimante), deux sorties séries, 
une sortie joystick et une sortie 
souris, une horloge temps réel 
(alimentée par pile, quand vous 
coupez l'alimentation), gestion de 
deux lecteurs de disquettes. Les 
autres slots (libres) accueilleront 
carte accélérateur, carte copro- 
cessor, disque dur, conversion 
analogique... un dernier point 
intéressant : l'alimentation (géné¬ 
reuse) est ventilée et thermosta- 
tée... 

Le clavier, très souple, toujours 
à la norme IBM, se branche à 
l'unité centrale par un cordon 
téléphone ; le moniteur par un 


cordon CINCH classique. 

Que se passe-t-il à la mise sous 
tension ? La disquette du lecteur 
A démarre et injecte le DOS dans 
la machine. Vous apprenez à l'oc¬ 
casion que vous disposez d'un 
système TURBO (horloge à 
8 MHz : IBM travaille à 
4,77 MHz, mais cette fréquence 
est commutable au clavier), de 
640 k-octets de RAM, que vos 
cartes d'extension sont vérifiées 
et qu'il est 1 5 heures, 35 minu¬ 
tes et 40 secondes ! ORIC, où 
est-tu ? 

Vous chargerez GEM (livré en 
standard) et vous choisirez votre 
application à l'aide de la souris, 
sur un écran très Macintosh. 
C'est le confort intégral et une 
souplesse d'utilisation inimagina¬ 
ble. On sent une puissance 
cachée et une rapidité que l'on 
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n'avait pas osé espérer il y a de 
cela un an. Et pourtant, cela 
existe... 

La machine est livrée avec Basic 
et Turbo Pascal. Notre préférence 
va à ce second langage, encore 
méconnu de nos lecteurs. Au fait, 
dans la première publicité d'ORIC 
en France, il était dit que Pascal 
était disponible. C'était, sans 
doute, une erreur d'impression... 
Et le prix ? Sans parler de la ver¬ 
sion de base (Turbo Base à 
4990 F TTC) très incomplète, 
nous partirons d'une version 
idéale : Turbo 640 MQ, qui com¬ 
prend, outre les interfaces décrits 
précédemment, deux lecteurs de 
disquettes et un moniteur, sou¬ 
ris, DOS Plus, GEM, Turbo Pas¬ 
cal qui vaut 8290 F TTC. 


Si vous remplacez un lecteur par 
un disque dur 10 M-octets, elle 
vous revient à 9990 F. Pour la 
version disque dur 20 M-octets, 
on arrive à 12 790 F. Ce sont 
certainement les prix les plus bas 
du marché. Oui, mais, me direz- 
vous, telle grande firme va sortir 
des ensembles équivalents au 
môme prix. Ne vaut-il pas mieux 
attendre ? La réponse est simple : 
ce futur matériel sera-t-il compa¬ 
tible ? Examinez la fréquence 
d'horloge, le graphisme... et vous 
aurez des doutes. 

En conclusion, JASMIN PC est 
un excellent appareil, très fiable 
et très agréable d'utilisation. Il est 
livré complet et opérationnel, ce 
qui est un atout important. 


A l'heure actuelle, ce genre de 
matériel n'a de valeur qu'à tra¬ 
vers les logiciels disponibles. Or, 
il vous suffit d'ouvrir un magazine 
d'informatique pour découvrir 
que, sur ce point, vous ne serez 
pas déçu. 

Nous entamerons bientôt une 
série d'articles sur la philosophie 
de la compatibilité IBM PC et sur 
la mise en œuvre de ce matériel. 
Contactez rapidement la rédac¬ 
tion de THEORIC pour nous faire 
savoir quels sont les sujets pré¬ 
cis qui vous intéressent dans ce 
domaine. Nous précisons que 
nous resterons dans le domaine 
de la vulgarisation afin de permet¬ 
tra à chacun de nous lire et de 
découvrir l'ordinateur utilisé à 
l'école comme dans l'entreprise. 
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CES FICHIERS 

DONT TOUT LE 
MONDE PARLE 


D. VASILJEVIC 

1 

■ I n'y a pas si longtemps, six à sept ans à peine, les 

■ fichiers ne suscitaient pas beaucoup d'intérêt, alors 

I qu'aujourd'hui il en est tout autrement. Les construc¬ 
teurs livrent les systèmes de micro-informatique avec les pro¬ 
giciels de traitement des fichiers et toutes les revues en 
parlent. Malheureusement, il s'agit, dans la plupart des cas, 
de l'IBM-PC et des compatibles, ou alors de l'APPLE et MAC ou 
de systèmes beaucoup plus lourds. Un utilisateur de l'ORIC, 
surtout s'il est débutant, est souvent complètement perdu. 




Pourtant la création et le traite¬ 
ment des fichiers sont assez sim¬ 
ples. Les possesseurs de lecteurs 
Microdisque ou Jasmin, associés 
à une imprimante bon marché, 
ont tout ce qu'il faut pour le faire. 
Ensemble, pas à pas, et exemples 
à l'appui, nous apprendrons ce 
que sont les fichiers et comment 
exploiter toutes les possibilités 
offertes dans ce domaine par le 
SEDORIC ou FT-DOS qui seront 
nos systèmes d'exploitation des 
fichiers. 


PREMIER CONTACT ET 
UN PEU DE VOCABULAIRE 

La raison 

d'être des fichiers 

• Si, après avoir entré toutes les 
lignes d'un programme, vous 
coupez le courant, il ne vous res¬ 
tera plus rien. Ça, me direz-vous, 
nous le savons déjà. Oui, mais 
saviez-vous que c'est la première 
bonne raison pour créer un 
FICHIER (FILE), en effectuant un 
ENREGISTREMENT (RECORDING) 
sur une simple cassette ou, 
encore mieux, sur un lecteur de 
disquettes ? Donc un simple 


SAVE "PROGRAMME” (ISAVE 
pour JASMIN) crée un fichier de 
sauvegarde de logiciel. Nous 
appelons ce type de fichier 
"FICHIER PROGRAMME” (pour 
SEDORIC : .COM - pour FT- 
DOS : .BAS : commun et Basic). 

• Quand votre programme tour¬ 
nera, il recueillera certainement 
diverses données et aboutira aux 
divers résultats. Avant qu'une 
coupure intempestive du secteur 
n'intervienne, sauvez-les ! Vous 
le faisiez déjà sur cassette par 
STORE V, "DONNEES”. Sur la 
disquette, cela sera un peu plus 
complexe, et nous y reviendrons 
en temps utile. Disons, pour le 
moment, que c'est un FICHIER 
DE DONNEES (DATA FILE). 
Ainsi, vous pourrez, plus tard, 
faire tourner ce programme (ou 
un autre) sans avoir à réintroduire 
vos données invariables. Vous 
pourrez aussi exploiter vos résul¬ 
tats avec un autre programme. 
C'est une deuxième bonne raison 
pour créer un fichier. 

• Vos programmes et vos don¬ 
nées sont enregistrés sur un SUP¬ 
PORT indépendant de votre ordi¬ 
nateur et de sa MEMOIRE CEN¬ 
TRALE, vous pouvez avoir autant 


de copies que vous voulez. Vous 
pouvez disposer de plusieurs 
exemplaires d'enregistrement, 
sur différentes disquettes, que 
nous appellerons les MEMOIRES 
SECONDAIRES. Ainsi, vous 
pourrez échanger avec vos amis 
les programmes (non piratés !), 
les données, etc. Si vous ne pos¬ 
sédez pas d'imprimante, votre 
ami plus chanceux pourra impri¬ 
mer vos listings pour vous. Cette 
INDEPENDANCE est une troi¬ 
sième bonne raison. 

• Votre programme est très long 
et sa taille dépasse de loin la 
capacité de notre ordinateur pré¬ 
féré (37631 BYTES FREE). Vous 
pouvez le scinder en plusieurs 
parties sauvegardées sur dis¬ 
quette. Le problème de taille ne 
se posera plus car la capacité des 
mémoires secondaires est nette¬ 
ment supérieure à celle de la 
mémoire centrale (environ 
360 000 octets pour nos dis¬ 
quettes). 

Voilà donc une quatrième bonne 
raison. 

• Vous pouvez, bien entendu, 
sauvegarder vos routines en code 
machine, vos dessins et vos tex¬ 
tes. Nous appellerons ce type de 
fichier le FICHIER BINAIRE en 
général, avec la possibilité de dis¬ 
tinguer le fichier "code”, le 
fichier "texte" et le fichier 
"écran”. 

En résumé, à la question "pour¬ 
quoi les fichiers”, nous pouvons 
répondre : 

— pour la conservation de l'infor¬ 
mation (programmes et don¬ 
nées), 

— pour le partage de l'informa¬ 
tion entre plusieurs programmes 
ou plusieurs utilisateurs, 

— pour l'indépencance des pro¬ 
grammes de données, 

— pour l'indépendance des pro¬ 
grammes et des données de la 
mémoire de stockage. 

Nous verrons plus tard que les 
fichiers servent aussi pour l'infor¬ 
mation du système et pour diver¬ 
ses commandes. 

Les supports des fichiers 

Les premiers supports de fichiers 
étaient des cartes perforées, sui¬ 
vies de près par les bandes (ou 
rubans) perforées. Les cartes per¬ 
forées servent encore aujourd'hui 
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pour la saisie de données en 
grand nombre (gros systèmes). 
Le ruban perforé est remplacé par 
la bande magnétique. Les casset¬ 
tes de notre lecteur de cassette 
font partie de ce genre de sup¬ 
port. 

Sur tous ces supports (sauf quel¬ 
ques exceptions pour la bande 
magnétique), l'écriture et la lec¬ 
ture des informations se font "à 
la queue leu leu". C'est le mode 
que nous appellerons SEQUEN¬ 
TIEL. 

Plus récemment, un nouveau 
type de support magnétique a 
augmenté et amélioré les possi¬ 
bilités de traitement des fichiers. 
C'est le disque magnétique. On 
peut distinguer trois formes prin¬ 
cipales : 

— disque souple (floppy), 

— disque amovible, 

— disque dur. 

'On pourra comparer le lecteur de 
disques à un "tourne-disque" 
mais les "sillons” magnétiques 
ne sont pas formés en spirale 
comme c'est le cas des disques 
HI-FI. Ils sont constitués de PIS¬ 
TES concentriques indépendan¬ 
tes. Pour arriver à un point quel¬ 
conque du disque, le bras n'est 
donc pas obligé de suivre la spi¬ 
rale en partant du premier sillon 
extérieur. Le mouvement de la 
tête de lecture-écriture est indé¬ 
pendant de la rotation du disque 
et les deux déplacements conju¬ 
gués permettent d'atteindre pres¬ 
que intantanément n'importe 
quel point du disque, pourvu que 
l'on sache où l'on désire se ren¬ 
dre ! Cette faculté du matériel 
permet un nouveau mode de 
l'écriture-lecture que nous appel¬ 
lerons DIRECT. Signalons tout de 
même que la recherche d'un sec¬ 
teur sur une piste reste séquen¬ 
tielle. Notre très chère et introu¬ 
vable disquette 3" fait partie de 
ce groupe. 

Enfin, dans la même lignée de 
supports magnétiques, le tam¬ 
bour magnétique est venu réunir 
plusieurs disques "VOLUMES" 
en un seul. 

Les MEMOIRES SECONDAIRES, 
constituées par les DISQUES 
MAGNETIQUES, nettement 
moins chères que les MEMOIRES 
CENTRALES, sont donc pour 


nous le SUPPORT idéal des 
fichiers. 

Notons néanmoins que tout se 
paie : 

L'accès à une mémoire secon¬ 
daire est environ 20 000 fois plus 
lent que l'accès à la mémoire cen¬ 
trale ; mais que cela ne vous 
effraie pas, la vitesse de nos lec¬ 
teurs est excellente et tout à fait 
suffisante pour nos traitements. 
Nous vous conseillons de relire la 
présentation physique de la dis¬ 
quette dans votre manuel d’utili¬ 
sation. 

La mémoire secondaire peut être 
augmentée pratiquement à l'in¬ 
fini. Ainsi, les systèmes pour 
ORIC prévoient déjà quatre lec¬ 
teurs (VOLUMES) pour un con 
trôleur. 

Les fichiers et 
ce qui les entoure 

Il résulte de tout ce que vous avez 
lu jusqu'à maintenant que ces 
fichiers dont on parle ne sont pas 
autre chose que les enregistre¬ 
ments en mémoires secondaires 
(EXTERNAL STORAGE) consti¬ 
tuées par le support magnétique 
que sont nos disquettes. La défi¬ 
nition plus "scientifique” est la 
suivante : 

Le fichier est un réservoir d'infor¬ 
mations liées logiquement entre 
elles et matérialisées sur un sup¬ 
port indépendant de la mémoire 
centrale. 

Un fichier est composé d'ARTI- 
CLES (RECORDS) qui correspon¬ 
dent à l'UNITE de TRANSFERT 
entre le PROGRAMME d'APPLI- 
CATION et le fichier. Autrement 
dit, un ARTICLE est l'ensemble 
d'informations qui, logiquement, 
doivent être manipulées en une 
seule fois par le programme d'ap¬ 
plication. Dans le cas d'un fichier 
d'adresses, cela peut être l'en¬ 
semble des renseignements 
concernant une personne — une 
"fiche". 

Les PROGRAMMES D'APPLICA¬ 
TION sont les programmes que 
vous écrivez vous-même. Ils sont 
nommés ainsi pour les différen¬ 
cier des programmes de base, qui 
sont le PROGRAMME D'EXPLOI¬ 
TATION (OPERATING SYSTEM), 
qui gère votre ordinateur, et le 
SYSTEME D'EXPLOITATION 
DES FICHIERS (FILE MANAGE¬ 


MENT SYSTEM). Ce dernier sont 
nos SEDORIC et FTDOS. 

Un fichier peut être organisé de 
différentes manières et cette 
organisation (FILE ORGANIZA- 
TION) dépend des liaisons des 
ARTICLES entre eux. On parle 
aussi de la STRUCTURE des LIAI¬ 
SONS. Le SYSTEME D'EXPLOI¬ 
TATION DE FICHIERS se charge 
de cette organisation. Par contre, 
la METHODE D'ACCES aux 
fichiers est définie par les PRO¬ 
GRAMMES D'APPLICATION en 
fonction de la sélection des ARTI¬ 
CLES. Pour le moment, habituez- 
vous à ces termes, nous y revien¬ 
drons en détail et tout sera plus 
clair. 

Les PROGRAMMES D'APPLICA¬ 
TION utilisent les PRIMITIVES ou 
les VERBES du système d'exploi¬ 
tation (SAVE, LOAD, CREATE, 
DEL, etc.). 

Le LANGAGE qui sert à écrire les 
PROGRAMMES D'APPLICATION 
s'appelle le LANGAGE HOTE 
(HOST LANGUAGE), car il reçoit 
les primitives. Dans notre cas, 
c'est le Basic de l'ORIC. 

En utilisant les PRIMITIVES du 
FT-DOS (DISQUE OPERATING 
SYSTEM) ou du SEDORIC 
(SYSTEME D'EXPLOITATION 
DES DISQUETTES), l'utilisateur a 
l'impression que tout est simple 
et ne se rend pas compte de l'or¬ 
ganisation réelle (nous dirons 
PHYSIQUE) des fichiers. Il ne 
"voit" que l'organisation "LOGI¬ 
QUE", c'est-à-dire celle qui 
découle des VERBES (SAVE 
PROGRAM "MACHIN CHOSE" 
sur le lecteur courant). Ceci est 
dû à la "TRANSPARENCE" du 
système de gestion des fichiers. 
Ce sont donc le FT-DOS et le 
SEDORIC qui font tout, et nous, 
en tant qu'utilisateurs, n'avons 
pas à nous préoccuper de l'orga¬ 
nisation physique des fichiers. 
Néanmoins, la connaissance de 
cette organisation nous sera très 
bénéfique. 

Nous y trouverons pas mal 
d'idées pour les programmes 
d'application. 

Pour cette raison, nous étudie¬ 
rons une prochaine fois l'organi¬ 
sation physique des fichiers et les 
principes qui guident un système 
d'exploitation.# 
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A SUIVRE 



P ossesseurs d'une MCP 40, réjouissez-vous i THEO- 
RIC vous offre un logiciel, écrit en langage 
machine, qui va radicalement changer le mode 
d'écriture de votre imprimante et, croyez-nous, les résul- 






























UTILISATION 


Le programme est divisé en 
deux parties : celle de # 9000 à 
#93FF est une table de formes 
qui doit être respectée comme 
celle du langage machine de 
#9400 à #97FF. Si l'écriture 
perd sa linéarité, c'est qu'au 
moins un octet de la table est 
faux. Vérifiez-la avec les sommes 
de contrôle. 

Ce programme retrace toutes les 
minuscules et quelques accents 
(voir fin de texte). Il peut être uti¬ 
lisé de deux façons : 

• En Basic, en mettant le texte à 
imprimer dans LA variable ZZ$ et 
en lançant le programme par 
CALL #9615. 

10 ZZ$ = "Salut (cd tous'': 

CALL #961 5 ^ 

donnera : 

Salut à tous. 

11 est de la responsabilité de l'uti¬ 
lisateur de ne pas écrire une ligne 
trop longue car, l'imprimante se 
mettant directement en mode 
graphique, elle ne va pas à la ligne 
seule. La longueur dépend du 
texte à écrire : 40 "i" prennent 
moins de place que 40 "m”. A 
la fin de la ligne, l'imprimante se 
remet en mode texte et peut être 
utilisée normalement par les ins¬ 
tructions LPRINT et LLIST. 

Le programme récupère dans la 
zone des variables ZZ$ son 
adresse et sa longueur et les 
passe à l'impression. 

• Avec le MINI-EDITEUR d'écran 
qui permet de composer sur un 
écran de 40 colonnes le texte. 
Son appel se fait par CALL 

• 9651. Le programme passe en 
minuscules et en 40 colonnes 
directement. 

Toutes les touches de curseur 
sont actives, y compris DEL et 
RETURN. Les majuscules s'ob¬ 
tiennent avec SHIFT et sont 
imprimées comme les autres 
caractères non reconfigurés tels 
quels. La justification n'est pas 
automatique comme pour un trai¬ 
tement de texte, mais elle peut se 
faire manuellement à l'ECRAN 
par CTRL X qui déplace le reste 
de la ligne vers la droite et avec 
CTRL Z vers la gauche. Il est bien 
entendu que même un texte bien 
aligné à l'écran perdra son aligne¬ 
ment à l'impression car cha¬ 
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que caractère n'a pas la même 
longueur. 

Attention, à ne pas sortir de 
l'écran en bas, car ceci fait 
remonter le texte vers le haut et 
‘vous perdez la première ligne. 
L'impression démarre dès que 
l'on appuie sur ESC. La vitesse 
est celle de la MCP 40, mais le 
langage machine fait qu'elle est 
à peu près aussi rapide qu'une 
impression normale par LPRINT. 
Pour éviter au programme 
d'analyser toutes les lignes vides 
en bas d'écran et d'en passer 
autant sur l'imprimante, il s'arrête 
dès qu'il rencontre un apostrophe 
en première colonne et en pre¬ 
mière seulement. Sinon, le pro 
gramme parcourera tout l'écran. 
Les minuscules accentuées sont 
obtenues aussi bien à l'écran que 
sur l'imprimante avec : 

qui donne é 
(? qui donne à 
? qui donne ê 
£ qui donne ù 
I qui donne ù 
qui donne è 
% qui donne â 
& qui donne ô 
\ qui donne ç 

N'oubliez pas de protéger le pro¬ 
gramme par HIMEM #8FFF. 


le caractère suivant avant de finir 
le caractère courant. 

Exemples : "os” est un chaînage 
haut, "as" est un chaînage bas. 

— De # 9380 à # 93B8 est une 
table des octets véritablement 
envoyés à l'imprimante en fonc¬ 
tion des directions. Ceci corres¬ 
pond au Basic LPRINT" 1,0". 

— # 93C0 octets d'initialisation. 

— # 93D0 message à l'écran. 

— # 97A6 à # 97FF adresses et 
contenus des caractères reconfi¬ 
gurés pour l'écran. 

Début du Langage Machine en 
#9400. 

— # 9400 à # 9408 incrémenta¬ 
tion d'adresse. 

— #9408 à #941C envoie 
octets de direction selon le 
contenu (02). 

— #941D à #9444 décode un 
octet de la table principale en 
32 : 4 fois dans direction 3. 

— # 9445 à # 946B envoie tous 
les octets pour une lettre donnée. 

— # 946B à # 9480 recherche 
l'adresse d'une lettre dans la 
table principale. 

— #9481 à # 9614 routine prin¬ 
cipale d'affichage d'une ligne : 
initialisation des pointeurs, prend 
un caractère dans le texte, teste 

•ce caractère pour savoir si c'est 
une minuscule ou si c'est un des 
caractères accentués, affichage 
corps principal, chaînage, test de 
fin de ligne, etc. 


AIDE A LA 
COMPREHENSION 

Description des tables : 

— de #9000 à #9267 corps 
principal pour chaque lettre. La 
table commence par le nom de la 
lettre 61 pour "a" et se termine 
avec l'octet FF ; un 00 indique 
qu'il faut lever le crayon ; un 09 
l'abaisse. Tous les autres concer 
nent les 8 directions élémentai¬ 
res que peut prendre le crayon. 
Exemple : 41 signifie aller 4 fois 
dans la direction 1 (0 degrés) ; 
B3 : 11 fois dans la direction 3 
(90 degrés). 

— De #9270 à #9378 est une 
table de chaînes pour attacher 
deux lettres qui se suivent. Le 
programme est obligé de regarder 


- #9615 à #9650 ENTREE n:1 
pour le Basic recherche de la 
variable ZZ$ et passage des para¬ 
mètres à la routine principale. 

- #9651 à # 979F ENTREE n:2 
pour le mini-éditeur d'écran qui, 
par l'appui de ESC envoie ligne 
par ligne par la routine principale 
le texte sur imprimante. 

En # 97A0 et # 97A3 sont reco¬ 
piées les deux entrées principa¬ 
les : 

CALL#97A0 est équivalent à 
CALL #9651 

CALL#97A3 est équivalent à 
CALL #9615. 

NOTE : Si la MCP 40 pèche par 
sa lenteur et sa largeur, ses feuil¬ 
les passent très bien à la photo¬ 
copie et deux feuilles font une lar¬ 
geur standard. 
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100 HIMEM#SFFF 

110 FORN=#9000TO#97FF:READA»:POKEN,VAL<+Ai) : NEXT : END 


1000 

REM DATA DU 

1010 

DATA 

61,00, 

1020 

DATA 

53,24, 

1030 

DATA 

00,61, 

1040 

DATA 

47,28, 

1050 

DATA 

28,41, 

1060 

DATA 

18,51 

.1070 

DATA 

43,52, 

1080 

DATA 

FF,69, 

1090 

DATA 

33,09, 

1100 

DATA 

62,53, 

1110 

DATA 

18,11, 

1 120 

DATA 

77,73, 

1 130 

DATA 

73,12, 

1 1 40 

DATA 

43,14, 

1 1 50 

DATA 

18,11, 

1160 

DATA 

FF,72, 

1170 

DATA 

73,12, 

1180 

DATA 

47,41, 

1 190 

DATA 

12,11, 

1200 

DATA 

57,28, 

1210 

DATA 

28,22, 

1220 

DATA 

12,13, 

1230 

DATA 

43,52, 

1240 

DATA 

52,21, 

1250 

DATA 

FF,7D, 

1260 

DATA 

00,13, 

1270 

DATA 

34,00, 

1280 

DATA 

61,17, 

1290 

DATA 

31,57, 

1300 

DATA 

FF,7C, 

1310 

DATA 

35,37, 

1320 

DATA 

00,00, 

1330 

DATA 

FF,FF, 

1340 

DATA 

23,FF, 

1350 

DATA 

23,FF, 

1360 

DATA 

FF,FF, 

1370 

DATA 

13,FF, 

1380 

DATA 

33,FF, 

1390 

DATA 

11,00, 

1400 

DATA 

11,00, 

14 10 

DATA 

21,FF, 

1420 

DATA 

12,FF, 

14 30 

DATA 

11,00, 

1440 

DATA 

11,00, 

1450 

DATA 

11,00, 

1460 

DATA 

FF,FF, 

1 470 

DATA 

2D,31, 

1480 

DATA 

31,0D, 

1 490 

DATA 

OA,12, 

1500 

DATA 

3D,20, 

1510 

DATA 

67,65, 

1520 

DATA 

20,20, 

1530 

DATA 

C8 , B1 , 

1540 

DATA 

FO,4A, 

1550 

DATA 

93,85, 

1560 

DATA 

01,60, 


45.87.28.21, 

18.57.28.21, 
11,22,63,67, 
11,18,17,13, 


u y , jL ‘i , z u 

E7.17,28 

13.24.25 
D3,E7,18 
13,62,53 
17,28,21 
68,13,62 
33,09,12 
16,18,00 
26,F7,27 
13,62,53 
18,77,73 

67.18.11 

17.18.11 
17,28,21 
15,16,17 

38.27.26 
FF 
22 
28 
14 
1 1 
14 
55 
09 
61 
21 
FF 
A3 
13 
35 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
FF 
12 
FF 
12 
31 
FF 
2D 
20 
20 
20 
A5 
El 
09 
C6 
A9 


,26,47 

,21,32 

,26,47 

,11,FF 

,24,25 

,22,43 

,53,24 

,14,16 

,37,09 

,43,32 

,24,25 

, 12,21 

,FF,6F 

,12,31 

,22,63 

,18,11 

,25,14 

,75,53 

,53,14 

, 21,22 

,15,26 

,FF,79 

,28,41 

,00,13 

,15,34 

,17,00 

,A7,09 

,26,00 
O cr 


,13,1 


,00 
,09,15 
,31,22 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,0D,FF 
,FF,2D 
,31,0D 
,0D,FF 
,2F,20 
,20,20 
,00,DO 
, 02,C9 
, C6,08 
,09,A5 
,52,85 


,28,21 
,33,14 
,26,51 
,65,00 
,26,F7 
,24,25 
,25,26 
,18,00 
.F7,27 
,21,18 
,26,E7 
,18,67 
,00,51 
,FF,70 
,27,24 
,12,13 
,13,11 
,67,28 
,15,16 
,53,14 
,47,26 
,53,67 
,12,46 
,09,11 
,00.38 
,A7,09 
.FF,25 
,53.35 
,13,09 
,34,00 
,23,24 
,12,23 
,12,23 
,31,32 
,12,33 
,11,22 
,12,33 
,22.23 
,FF,11 
,FF,11 
,FF,1 1 
,FF,11 
,FF,31 
,FF,12 
,FF,FF 
,FF,FF 
,31,2C 
,FF,FF 
,FF,FF 
,3D.20 
, 20,20 
,02,E6 
.OD,DO 
,A5,08 
.09,00 
,06,DO 


,15,16 
,FF,64 
,13,09 
,B7,28 
,26,47 
.F7.27 
,37,09 
,26,15 
,17,16 
.17,28 
,18.11 
,43,09 
,33,F7 
,25,26 
,12,21 
,00.17 
,21,22 
,17,18 
,15,16 
,15,14 
,28,11 
,37,12 
,32,00 
,11,17 
.FF,40 
,00,A3 
,00,13 
,34,36 
,38,11 
,15,33 
,FF,FF 
,FF,FF 
,FF,FF 
,FF,FF 
,23,FF 
,FF,FF 
.FF,FF 
,00,27 
,00,27 
,FF,FF 
,00,27 
,FF,FF 
,FF,FF 
,FF,28 
,FF,30 
,30,OD 
,FF,31 
,FF,FF 
,66,69 
,20,20 
,01,60 
,F4,60 
, OA,OA 
,F7,60 
,OD,C9 


.77 
,17 
,00 
,41 
, 1 1 
,28 
,43 
,77 
,24 
,15 
,41 
, FF 
. 14 
, 37 
. 47 
,18 
,31 
,63 
,51 
, 17 
, 13 
,22 
,21 
, 36 
,00 
,00 
,25 
,09 
, 00 
, 17 
,31 
, FF 
, FF 
, FF 
, FF 
, FF 
, FF 
, FF 
,09 
,09 
, FF 
,09 
,FF 
, FF 
, FF 
,2C 
, FF 
,2C 
, FF 
,6E 
,20 
. A5 
.48 
, OA 
, AO 
,09 


,18 
, 18 
,61 
,22 
,22 
,21 
. 32 
. 18 
. 43 
, 1 4 
.FF 
, 6E 
,25 
,E3 
,28 
,37 
.09 
,77 
.FF 
,18 
, 17 
, 63 
,18 
,15 
,A7 
, A3 
,00 
,34 
,61 
,00 
, FF 
,12 
,12 
,12 
,12 
,32 
,12 
, FF 
, FF 
, FF 
, FF 
, FF 
,FF 
, FF 
,00 
,31 
, FF 
,2D 
,FF 
,20 
,20 
,06 
~>Q 

, 18 
,00 
, DO 


, 1 1 
. 1 1 

, 33 
, 13 
, A3 
,22 
.21 
, 1 1 
,52 
,13 
, 6D 
, 13 
,26 


, FF 
, 12 
,09 
,14 
,24 
,B7 
,18 
, FF 
,21 
. 12 
, 13 
,12 
.47 


,13,32 
. 21,22 
,16,27 
,18,11 
,18.11 
,77.13 
,51,FF 
,18.11 
,F7,27 
,97,26 
,17,00 
.09,FF 
,25,00 
,13.09 
.36.00 
,17,00 
,21,A7 
, 00,00 
,FF,FF 
,FF,FF 
,23,FF 
,FF,FF 
.FF,FF 
,33.FF 
,FF,FF 
,11,00 
, 1 1,FF 
,11,FF 
,31,FF 
,21,FF 
, 12,FF 
,90,31 
,OD,FF 
,FF.2D 
,31,0D 
,FF.45 
.64,65 
,20,20 
,20,Cl 
.OF,85 
,69,80 
,B1,00 
,06,A9 


, 62 , 
, 31 , 
,24 . 
,35, 
,25 , 
, 26 , 
,57 , 
, 6A. 

• FF, 
.11. 
.12, 
.21 . 
.28, 
.11, 
,C7 . 
,18, 
, FF, 

• FF, 
,12, 
, 78 , 

«■) J "> 

9 S- -4- y 

, 26 , 

,15, 

,A7, 

,5E, 

,13, 

,34, 

,61 , 

,21 , 

,09, 

,00 . 

, FF, 

, FF, 

, FF, 

, FF, 

, FF, 

, FF, 

, FF, 

,27, 

, FF, 

, FF, 

, FF, 

, FF, 

, FF, 

,2C, 

, FF, 

,31 , 

, FF, 

,53, 

,20 , 

,20, 

, F5 . 

.08 . 

,85, 

,C9, 

, 4 A, 


13,62 
FF, 63 
25,26 
26,47 

16.17 
15,24 
18,11 
33.00 
6B. 13 
18,57 

21.18 
18,77 
21,22 
18,67 
A3,21 
21 ,FF 
74,93 
76,13 
11.18 
22,11 
28,21 
15,24 
24,43 
51,09 
00 ,A3 
09,15 
36,00 
17.00 
A7,09 
FF, 5C 
00,00 
FF, 12 
FF. 12 
FF, 12 
FF, 32 
FF, 22 
FF. 12 
FF, FF 
09, FF 
FF, FF 
FF, FF 
FF, FF 
FF, FF 
FF, FF 
30, OD 
FF .FF 
2C,2D 
FF. FF 

43.20 
70,61 

20.20 
AO .FF 
68,29 
02 , A9 
FF, DO 
85,06 
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1570 

DATA 

DO,03,20,1D 

1580 

DATA 

01,A0,00,B1 

1590 

DATA 

DO,F7,20,00 

1600 

DATA 

A2,70,AO,92 

1610 

DATA 

OA,OA,18,65 

1620 

DATA 

6B,94,20,45 

1630 

DATA 

FO,F7,C9,7 6 

1640 

DATA 

86,FB,60,A9 

1650 

DATA 

Cl,93,20,Cl 

1-660 

DATA 

FC,A5,07,C9 

1670 

DATA 

IC,20,91,94 

1680 

DATA 

20,Cl,F5,A9 

1690 

DATA 

7D,DO,04,A9 

1700 

DATA 

61,DO,64,C9 

1710 

DATA 

5F,DO,04,A9 

1720 

DATA 

63,DO,3C,A9 

1 730 

DATA 

20,1D,94,A9 

1740 

DATA 

20,C1,F5,A9 

1750 

DATA 

4C,2C,95,85 

1760 

DATA 

20,45,94,4C 

17 70 

DATA 

EF,94,18,A5 

1780 

DATA 

07,A5,05,C9 

1 790 

DATA 

9D,85,00,84 

1800 

DATA 

90,EF,E6,01 

1810 

DATA 

00,8D,7C,93 

1820 

DATA 

6A,02,A9,7F 

1830 

DATA 

CA,DO,F5,A9 

1840 

DATA' 

E8,AO,00,BD 

1850 

DATA 

A9,00,85,00 

1860 

DATA 

CC,20,E8,G5 

1870 

DATA 

20,1 1 , 97,4C 

1380 

DATA 

20,42,97,4C 

1890 

DATA 

D9,CC,4C,AO 

1900 

DATA 

8C,97,C9,18 

1910 

DATA 

4C,A5,96,20 

1920 

DATA 

36,00,E6,01 

1930 

DATA 

03,60,C6,01 

1940 

DATA 

A5,01,C9,FF 

1950 

DATA 

60,AO,28,88 

1960 

DATA 

7F,91,02,4G 

1970 

DATA 

96,C8,B1,02 

1980 

DATA 

A9,FF,8D,OC 

1990 

DATA 

04,08,1C,22 

2000 

DATA 

10,08,1C,22 

2010 

DATA 

1C,22,IC,22 

2020 

DATA 

1C,22,1C,02 

2030 

DATA 

IC,22,00,22 


, 3E, 


20 

C5 

A9 

FA 

13 

A2 

F3 

85 

E8 

B0 

FD 

20 

DO 

DO 

DO 

85 

20 

20 

38 

95 
69 
DO 
AO 
9F 
B1 
OC 
85 
97 
01 
05 

96 

96 
C9 
03 

97 
01 
C6 
OC 
00 
97 
29 
20 
20 

20 

20 

22 

26 


,00 
,07 
,01 
, FO 
, 65 
,00 
,C9 
, FA 
, EO 
,06 
, A 5 
,C1 
, 74 
,04 
,4C 
, 06 
, 1D 
, 1D 
, E9 
,A2 
,28 
,01 
,00 
, C5 
, 00 
,02 
,05 
,91 
,A2 
,C9 
,C9 
,C9 
,7F 
, 4C 
,4C 
,C9 
,00 
,38 
, DO 
,A4 
,7F 
, CE 
, 1E 
, 1E 
, 1E 
, 1E 
, IA 


,94 
, DO 
, DO 
,02 
,00 
,A5 
,77 
,85 
, 07 
,A9 
, FD 
,F5 
,C9 
,A9 
,C9 
, A5 
,94 
,94 
, 60 
, A8 
,85 
, 60 
, B1 
,01 
, 85 
,20 
,A2 
,03 
,A8 
,08 
, OA 
, OD 
, DO 
,59 
, AO 
, IB 
,A5 
, A5 
,07 
,00 
,91 
,CC 
,00 
,00 
,00 
,00 
, ool 


,4C,45,94,AD,7E,93,85,00,AD,7F,93,85 
,04,20,00,94,60,20,00,94,B1,00,C9,FF 
,E6,A9,00,85,70,A5,FB,FO,03,20,1D,94 
,A2,F8,36,00,8 4,01,A6,FC,CA,8A,85,OB 
,85,00,A5,01,69,00,85,01,20,45,94,20 
,07,C9,62,DO,05,A2,01,8A,DO,OC,C9,6F 
, FO , EF , 86 , FA , A2,00 , A5-, FA , DO , 02 , A2,22 
,FB,85,FD,A9,4A,85,06,85,70,A2,00,BD 
,DO,F5,A4,FD,B1,04,85,07,38,E9,60,85 
,20,85,FE,DO,6E,C9,61,90,20,C9,7B,BO 
,CD,7C,93,DO,D5,A9,11,20,Cl,F5,A9,0D 
,60,85,FE,G9,7B,DO,04,A9,65,DO,7C,C9 
, 5E . DO , 04 , A9,65 , DO . 6C , C9,40 , DO , 04 , A<? 
,61,DO,5C,C9,26,DO,04,A9,6F,DO,54,C9 
,7C,D0,04,A9,75,00,44,C9,5C,D0,04,A9 
,70,DO,OC,A2,23,A5,FA,FO,02,A2,37,8A 
,A9,50,20,C1,F5,A5,FE,20,C1,F5,A9,OD 
,A9,00,85,FA,85,FB,A9,4A,85,06,85,70 
, 85 , FC, 20,91 , 94 , A5 , FE, 85,07,20,6B, 94 
,AO,BB,86,04,84,05,A9,28,8D,7C,93,20 
,04,A5,05,69,00,85,05,A5,04,C9,EO,DO 
,AO,00,B1,0 4,C9,2F,DO,DB,60,A5,9C,A4 
,00,C9,5A,F0,12,18,A5,00,69,07,85,00 
,10,E7,60,C8,B1,00,C9,DA,DO,E7,C8,B1 
,04,C8,B1,00,85,05,4C,EF,94,A9,2B,8D 
,CE,CC,A2,1 A,BD,CF,93,4 9,80,9D,81 ,BB 
,00,BD,A6,97,85,03,E8,BD,A6,97,85,04 
,ES,C8,CO,08,DO,F5,C6,05,A5,05,DO,El 
,AO,BB,86,02,84,03,FO,05,A5,05,20,D9 
,DO,06,20,35,97,4C,AO,96,C9,09,DO,06 
,DO,06,20,1E,97,4G,AO,96,C9,OB,DO,06 
,DO,OF,A2,00,86,00,20,1E,97,A9,OA,20 
, 06,20,35,97,4C, AO ,96 ,C9,1B,D0,03 ,^4C 
,97,C9,1A,DO,03,4C,72,97,C9,20,BO,03 
,96,E6,00,AS,00,C9,28,FO,01,60,A2,00 
,FO,OC,18,A5,02,69,28,85,02,90,02,E6 
,00,C9,FF,FO,01,60,A2,27,86,00,C6,01 
,02,E9,28,85,02,BO,02,C6,03,60,E6,01 
,A9,20,91,02,4C,A5,96,88,B1,02,C8,29 
,88,C8,CO,27,DO,07,A9,20,91,02,4C,A5 
,02,4C,75,97,20,E2,95,A9,OB,8D,6A,02 
,60,FF,FF,FF,4C,51,96,4C,15,96,D8,B7 
,EO,B7,10,08,22,22,22,26,1A,00,E8,B7 
,E0.B6,00,00,1E,20,20,20,1E,04,F0,B6 
,00,B6,10,08,IC,02,1E,22,1E,00,28,B5 
,30,B5,IC,22,00,IC,22,22,IC,00,F8,B6 


Une ligne téléphonique est à votre disposition, vous met¬ 
tant en contact direct avec la rédaction. Ceci est un ser¬ 
vice sans égal ! Respectez simplement les horaires et les 
jours que nous vous indiquons : 

MERCREDI de 9 h à 12 h et de 14 h à 17 h. 
VENDREDI de 9 h à 12 h seulement. 

Tout appel en dehors de ces créneaux sera refoulé : ne 
dépensez pas inutilement votre argent ! 

Le numéro : 1 99»52»9&» II» 
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no F 

□ 


i«F. 

□ 


+ 10 % de port. 




'Joict 2 &c. muxLUjicxtiaxA ftoun 2’0RIC-1 

C e ^jeXiX ^nonnxmrjme B fl S IC irrri|\£amile a 
tln de «8FD0 usne fj etite n/Midime tyjû e<d 
de <LO*itie d’um caruLatène Aun 


2a 


ao-pxe 


aut. E’flTHOS :F5C1 

H oîa cRe^ muyî <rbe mumaRe |uxo aï Xe 

c%njT.jÿe araec 2’ OR ICI F5C1 juin F57B Aecam 
2e 2iasne d’ fl CHENIERE cnn cj&û deux tumx- 

tûrteo (ite AynX |uxû exxcJte/meml; Aermi»2aR2eA. 


5 AD=38FC0 
10 DCKES940C,AD 
20 D0KE#3414,AD 
30 DGKE«3503,flC 
40 DGKE»2538,AD 
50 D0KE*353D,AD 
60 DGKES9542,AD 
70 D0KE335AB,AD 
80 DOKE39580,AD 
30 D0KE49565,AD 
100 D0KES965C,«CC0A 
110 D0KE4973A,«CC0A 
120 D0KE#36A3,8CC12 
130 DOKE826E0,ttCCI2 
140 DCKE896A6,8C5F8 
150 REPEAT:READA$ 

160 fl=JALC"«' i-A*] :FCKEAD,fl:AD=flO + l 
170 UNTILA$="FF" 

200 DATA06,78,8D,01,03,AD,00,03,29,EF,80 

,00,03,AD,20,23,03,10,80,00,03 

210 DATA28.AD,00,03,23,02,F0,F3,AD,00,03 


,60,FF,FF 


Nom 

Prénom 

Adresse 


ijait u/t, |veu 2'\Leo2a^e rmeÛA. 

■ • • • 

PnMA^n. 2e tout |um um HlflEF! W3FCF 


truwLcPu 


Ci joint, un chèque de . F à l'ordre des 
Editions SORACOM, La Haie de Pan, 35170 
BRU2 
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L e Jeu de la Vie est une des simulations les plus clas¬ 
siques, réalisées lors de l'apparition des ordina¬ 
teurs. Jusqu'à présent, nous n'avions proposé à 
nos lecteurs aucune version de ce jeu. Devant les quali¬ 
tés (nombre d'options, rapidité de calcul, etc.) de la réa¬ 
lisation de Guy HERMANN, nous n'avons pas résisté au 
plaisir de vous la présenter. 


REGLES DU JEU 

On se propose d'étudier l'évolu¬ 
tion d'une population de cellules 
dans un certain espace constitué 
de cases pouvant contenir cha¬ 
cune une cellule. Dans notre cas, 
l'espace de jeu sera constam¬ 
ment représenté sur l'écran et 
comporte 988 cases. Le bord de 
l'écran est représenté par un 
carré grisé (caractère 126 ASCII), 
une case vide par un espace et 
une cellule par un carré blanc. Le 
joueur devra entrer la population 
initiale puis, il ne lui restera plus 


qu'à observer les superbes figu¬ 
res qui vont se succéder sur 
l'écran (à la vitesse qu'il aura 
choisie). Mais l'évolution ne se 
fait pas au hasard, elle obéit aux 
règles suivantes : 

— on appelle voisinage d'une 
case (ou d'une cellule) les 8 cases 
qui l'entourent ; 

— une cellule ayant 2 ou 3 voi¬ 
sines (c'est-à-dire un voisinage 
égal à 2 ou 3) survit ; 

— une cellule ayant moins de 2 
voisines meurt ; 

— une cellule ayant plus de 3 voi¬ 
sines meurt ; 


— une case vide ayant 3 cellules 
voisines enregistre une nais¬ 
sance ; 

— le bord de l'écran est traité 
comme une case vide mais qui 
n'enregistrera jamais de naissan¬ 
ces. 

REMARQUE : c'est un jeu très 
connu et qui se prête très bien au 
traitement informatique... 

MODE D'EMPLOI 

Après quelques secondes s'affi¬ 
cheront les règles du jeu et se 
dessinera l'espace de jeu : le cur¬ 
seur "?" apparaîtra. Pour créer 
une cellule à l'endroit où se 
trouve le "?" appuyer sur 
ESPACE. Pour déplacer le 
utiliser les flèches de direction. 
Quand la population initiale dési¬ 
rée est entièrement introduite, 
appuyer sur ESC alors commen¬ 
cera l'évolution. Pour sortir de la 
routine d'évolution, appuyer quel¬ 
ques secondes sur ESC. 

Il a aussi été prévu une gestion 
sur cassette ou disquette JAS¬ 
MIN des populations initiales. En 
effet, on a la possibilité de sau¬ 
ver la population initiale sur cas¬ 
sette ou disquette. Cette possi¬ 
bilité apparaît sous forme d'un 
menu immédiatement après avoir 
quitté la routine d'évolution. 

POUR LES LECTEURS 
DE THEORIC 

Tapez le programme (attention 
aux fautes dans les DATA du 
LM). 

Faire RUN : les règles du jeu et le 
mode d'emploi sont inclus dans 
le programme. 

FONCTIONNEMENT 
DU PROGRAMME 

Pour ce qui est de la partie Basic, 
il suffit de se repérer grâce aux 
nombreuses REM situées dans le 
listing. Signalons que l'on peut se 
passer de taper les REM lors de 
l'écriture du programme. 

Pour ce qui est de la routine LM, 
en voici les traits essentiels : on 
détermine pour chaque case son 
nouvel état (c'est-à-dire si, à la 
génération suivante, elle contien¬ 
dra ou non une cellule). Quand 
toutes les 988 cases ont été trai- 
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tées, on représente la nouvelle 
génération à l'écran. Puis, on 
effectue une pause réglable par 
l'utilisateur et on recommence. 
Je tiens tout de même à préciser 
que l'utilisation de la mémoire 
écran est optimale : en effet, on 
pourrait être tenté de croire qu'il 
faille la mémoire plus une 
mémoire de travail. En réalité, il 
n'en est rien ; les caractères 33 
et 35 représentent un espace, la 
routine teste en fait le bit 0 du 
caractère qu'elle trouve en 
mémoire écran (qui, rappelons-le, 
fait aussi office de mémoire de 
travail). Ce bit 0 indique l'état de 
cette case : b0= 1 — case occu¬ 
pée par une cellule, b0 = 0 — 
case vide. La routine détermine 
ensuite, compte tenu du voisi¬ 
nage, le nouvel état de la case et 
le fixe selon le même code que 
précédemment dans le bit 1 de la 
case ; sans que cela ne change 
le dessin à l'écran car c'est uni¬ 
quement de bO que dépend le 
dessin du caractère. Quand tou¬ 
tes les cases ont été traitées, on 
égale le bO du caractère de cha¬ 
que case au bl. Ainsi, c'est le 
nouvel état qui est dessiné. Pour 
mieux comprendre le principe, 
voici une représentation binaire 
de 5 caractères : 

32 = %00100000 
34=%00100010 : caractères 
blancs (b0 = 0) 

33 = %00100001 

35 = %00100011 : espaces 
(b0= 1) 

36 = %00100100 : bord du jeu 
(bO = 0) compte bien comme une 
case vide conformément aux 
règles. 

REMARQUE : les possesseurs du 
SEDORIC pourront adapter faci¬ 
lement les lignes qui sauvegar¬ 
dent les populations initiales. 

Ce programme est totalement 
compatible ORIC-1/ATMOS. 



ORGANIGRAMME DE LA ROUTINE D’EVOLUTION 
DU "JEU DE LA VIE" 


Début 


N-1 —Temporisation 


Réajustage caractères 
pour afficher nouvelle 
génération 


V - voisinage de la case 
N - nombre de cellules 
qui entourent cette case 


non 


N-N + 1 


Naissance d'une cellule 
dans la Nième case 


La cellule contenue dans 
la Nième case meurt 



non 

/ A-t-onN^ oui 

Fin et retour 

ir — y 


VESC'?/ 

au basic 


Une ligne téléphonique est à votre disposition, vous met¬ 
tant en contact direct avec la rédaction. Ceci est un ser¬ 
vice sans égal I Respectez simplement les horaires et les 
jours que nous vous indiquons : 

MERCREDI de 9 h à 12 h et de U h à 17 h. 
VENDREDI de 9 h à 12 h seulement. 

Tout appel en dehors de ces créneaux sera refoulé : ne 
dépensez pas inutilement votre argent ! 

Le numéro : 99.52.98. VI. 
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100 REM JEU DE LA VIE 
110 REM PAR GUV HERMANN 
120 REM 
130 REM 

140 HIMEM46FFE:P0KE4727F,#60:G0SUB820 
:CLS:PRINT: PRINT: PRINT 
150 ' 

160 ' PREPARATION DE L’ECRAN 
170 ' 


180 GQSUB73G:CLS:F0RX = #BB80T0#BBA7 :F0 
KEX,36:F OKE X + 1080, 36 : NEX T 
190 F0RY=1T026:D0KE#BB8O+Y*40,8228:F0 
KE#BBA7+Y*40,36:NEXT 


200 



210 


SAISIE DE LA 

220 


POPULATION INITIALE 

230 


AU MOYEN DE CE 

240 


MINI-EDITEUR 

250 



260 

X= 1 

:Y=1 :A=FRE("") 


270 A=#BB80+X+Y*40:Q=PEEK(A):P0KEA,63 
280 GETA*:IFA*=CHR* (27) THENF’OKEA, Q: GO 
T0410 

290 IFA* OCHR* (32) THEN320 

300 IFQ-32THENF0KEA,33:Q=33:G0T0320 

310 F’OKEA,63:Q=32 

320 IFA*=CHR*(8)ANDX>1THENP0KEA,Q:X=X 
-1:G0T0270 

330 IFA*=CHR*(9)ANDX<38THENP0KEA,Q: X = 
X+1:G0T0270 

340 IF A*=CHR*(10)ANDY<26THENP0KEA,Q:Y 
= Y+1 :G0T0270 

350 IFA*=CHR*(11)ANDY>1THENP0KEA,Q:Y= 
Y—1 :GOT0270 
360 G0T0280 


370 ’ 

380 ' SAUVEGARDE DE LA 

390 ' POPULATION COURANTE 

400 ' 

410 F’0KE#70C0,2:P0KE470C2,0:CALL470AD 

420 ' 

430 ’ APPEL DE LA ROUTINE 

440 ' D’EVOLUTION 

450 ’ 

460 CALL47093 
470 ' 

480 ' MENU PRINCIPAL 

490 


500 CLS: PRINT: PRINT: PRINT : PRINT" 


DESIREZ-VOUS : M 

510 PRINT: PRINT: PR INT"1 —> REVOIR LA 
GENERATION PRECEDENTE 

520 PRINT:PRINT"2 —> ENTRER UNE NOUV 
ELLE GENERATION 

530 PRINT: PRINT"3 —> SAUVER UNE GENE 
RATION SUR DISK" 

540 PRINT: PRINT"4 —> CHARGER UNE GEN 
ERATION (DISK)" 


550 FRINT:FRINT"5 
RATION SUR K7" 

560 FRINT : PRINT"6 
ERATION (K7>" 

565 FRINT:FRINT"7 
AMME" 


—> SAUVER UNE GENE 
—> CHARGER UNE GEN 
— > SORTIR DU F’ROGR 


570 F R1NT : PRINT : PRINT : PRINT 


580 GETA*:A=VAL(A*):IFA=1THENP0KE470C 
0,0:P0KE470C2,2:CALL470AD:G0T0460 
590 IFA=2THEN180 
600 IFA<30RA>6THEN660 

610 F'RINT: FRINT: INF'UT" NOM DE LA GEN 
ERATION "; G*:G=LEN(G*) 

620 IF A=3ANDG>1ANDG<9THENG*=G*+".BIN, 
47280,476E0":!SAVEG* 

630 IFA=4ANDG>1ANDG<9THENG*=G*+".BIN" 
: !LOADG* 

640 IFA=5ANDG>1ANDG<17THENCSAVEG*,A#7 
280,E476E0,AUTO 

650 IFA=6ANDG>1ANDG<17THENCL0ADG* 

660 IFA=7THENP0KE61B,3:END 
665 P0KE618,10SG0T0500 
670 ’ 

680 * SOUS-PROGRAMME 

690 ’ D’ENTREE DE LA 

700 ’ TEMPORISATION 

710 ’ 1=RAPIDE 255=LENT 

720 * 

730 INF'UT" DUREE DE LA PAUSE ENTRE DE 



840 ’ 

850 ’ CODAGE CELLULES 

860 ’ (DESSIN MODIFIABLE) 

870 * (VOIR LIGNE 920 ) 

880 ’ 

890 FORX=OT07:F’0KE#B400+34*8+X,0:NEXT 
900 FOR X =0 T07:READA:P0KE#B400+33*8+X, 
A:P0KE#B400+35*B+X,A:NEXT 
910 F0RX=0T07:P0KE#B400+36*8+X,PEEK<# 
B400+126*8+X):NEXT 
920 DATAO,30,30,30,30,30,30,0 
930 ’ 

940 * 

950 ‘ TABLEAUX D’EXPLICATIONS 
960 ’ 

970 (LORS DE L’ECRITURE DE CETTE ) 


971 ’ (PARTIE DU PROGRAMME,ON ) 

972 ’ (ECRIRA LES F’RINT A L’AIDE DU ) 

973 ’ (POINT D’INTERROGATION,SINON ) 

974 * (CERTAINES LIGNES NE ) 

975 * (RENTRERONT PAS. ) 

976 ’ 

977 ’ 

980 PRINT:FRINTCHR*(4);CHR*<27> ; "J 
JEU DE LA VIE";CHR*(4) 


990 PRINT:F'RINT: F‘R INT" IL S’AGIT D ’ ET 
UDIER L’EVOLUTION D’UNE" 

1000 FRINT"POPULATION DE CELLULES QUI 
VIVENT DANS" 

1010 FRINT"UN ESPACE CONSTITUE DE 988 
(=38*26) CASES. 

1020 F’RINT"L EVOLUTION D’UNE CELLULE 
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DEPEND DE SON VOISINAGE. 1 

1030 PRINT"LE VOISINAGE ETANT COMPOSE! 
DES 8 CASESENTOURANt UNE CELLULE. 1 

1040 PRINT-UNE CELLULE EST REPRESENTE 
E PAR: 

1050 PRINT"UNE CASE VIDE («CELLULE MO 
RTE) : ' j 

1060 PRINT"LE BORD DE L'ESPACE CONSID| 

ERE : " ;CHR*<126> ;. 

1070 PRINT"L EVOLUTION OBEIT AUX REGLi 
ES SUIVANTES" • 

1080 PRINT" -UNE CELLULE AVANT 2 OU 
3 VOISINES SURVIT 

1090 PRINT" -UNE CELLULE AYANT - DE 1 
2 OU + DE 3 VOISINES MEURT 
1100 PRINT" -UNE CASE VIDE AYANT 3 v| 
01SINES EN- REGISTRE UNE NAISSANCE" 

1110 PRINT" -LE BORD DE L'ESPACE EST . 

EQUIVALENT A UNE CASE VIDE I 

1120 PRINT:PRINT" APPUYEZ SUR UNE TOU 
CHE" 

1130 A*=KEY*:IFA*=""THEN1130 
1140 CLS:PRINT: PRINTCHR$(4);CHR*(27); i 
"J JEU DE LA VIE";CHR*(4) I 

1150 PRINT:PRINT:PRINT"ON INTRODUIS L 
A POPULATION INITIALE AUMOYEN D'UN MINI 
I-EDITEUR 1 

1160 F'.RINT"LE '?' REPRESENTE LE CURSE 
UR. I 

1170 PRINT"ON SE DEPLACE GRACE AUX QU 
ATRE FLECHES 

1180 PRINT"L APPUI SUR [ESPACE! CREE i 
UNE CELLULE A L - ENDROIT OU SE TROUVE L ! 

E ' ? ' " 

1190 FRINT"POUR SORTIR DE L'EDITEUR Ei 
T COMMENCER A OBSERVER L'EVOLUTION "; I 
1200 PRINT"IL FAUT TAPER CESC!" 

1210 FRINT"LA TOUCHE CESC3 SERT AUSSI . 
A SORTIR DE LA ROUTINE D'EVOLUTION" | 
1220 PRINT:PRINT" VEUILLEZ PATIENTER 
QLQS INSTANTS | 

1230 ' I 

1240 ' IMPLANTATION DES 


1250 ' ROUTINES L.M 

1251 ' 

1252 ' (ATTENTION A BIEN RECOPIER) 

1253 ' (CES DATAS ) 

1254 ' 

1260 ' 

1270 A=#7000:F=#70CD:L=1310:REFEAT: FO 
R A=A TO A+15:READ C* 

1280 K=VAL("#"+C*>:S=S+K+65536*(S+K>6 
5535): IF A<=F THEN FORE A, K 
1290 NEXT:READ D*:IF 5=VAL("#"+D*> TH 
EN L=L+10:UNTIL A>F:GOTO1440 
1300 PING:PRINT"Erreur ligne";L:END 
1310 DATA 20,08,70,C8,20,08,70,C8,B 1, 
00,29,01,FO,01,E8,60,05D4 
1320 DATA A9,80,85,00,A9,BB,85,01,A9, 
1A,85,02,A9,26,85,03,OCOD 
1330 DATA A2,00,AO,00,20,00,70,AO,28, 
20, 00, 70, AO, 50, 20, 00, 1047 
1340 DATA 70,AO,29,B1,00,29,01,FO,01, 
CA,C9,01,F0,4A,EO,03, 16FD 
1350 DATA DO,06,B1,00,09,02,91,OO,E6, 
00,DO,02,E6,01,C6,03,1C8B 
1360 DATA DO,CE,A5,00,18,69,02,85,00, 
90,02,E6,01,C6,02,DO,22E4 
1370 DATA BB,A9,BB,85,01,A9,A8,85,00, 
A2, IA,AO,26,B1,00,29,29BB 
1380 DATA 02,4A,09,20,91,00,88,DO,F4, 
A5,00,18,69,28,85,00,2EE0 
1390 DATA 90., 02, E6,01, CA, DO, E4,60, EO, 
03,FO,B6,EO,02,FO,B2,3844 
1400 DATA 4C,48,70,20,10,70,AD,08,02, 
C9,A9,FO,EA,AO,O1,A2,3F2E 
1410 DATA 00, E A, EA, EA, C A, DO, F A, 88, DO, 
F5,4C,93,70,A9,80,85,49CA 
1420 DATA 00,85,02,A9,BB,85,03,A9,72, 
85,01,A2,05,AO,00,B1,4F D6 
1430 DATA 02,91,00,68,DO,F9,E6,01,E6, 
03,CA,DO,F2,60,00,00,5776 
1440 PING:PRINT:FRINT" APPUYEZ SUR UN 
E TOUCHE 

1450 A*=KEY *: IFA*=""THEN1450 
1460 RETURNB 


uitm a> aatkiaitlMts prlBiIns 
iflfll M’OAlH© * calcul mental [Î2ÔJj 

MUSIRAMA ® l'écr11art musicale fl40F| 
LISSAGE f représaitatiei, étfltlaa t^ 20F l 


SYSTEM , ANIMATION®nVJ M G ^ m 
0 UÏIMATIC 1 ®pV^r^T 

f»20F l 

ET LES AUTRES... 


® ATMOS, TELESTRAT 


® MOS 



Pour plus de détails sur nos logiciels, 
nos matériels, connaître l'adresse 
^de nos dépositaires... 

MINITEL: 7540.48.44 
itellha 9h tl les »ttk-tnd, 
ou notre catalogue 
^complet, contre 
^2 timbres à 

LOGICIELS, ’\ v J\^2,20F 

- MICRO-INFORMATIQUE 

et 

PERI-INFORMATIQUE 


80, rue des fourniers 07 500 GUILHERAND =" 


!□ MATH-SAM □ MUSIRAMA □ LISSAGE □SYSYeM'ANIMATION DOUTIMATIC _ réglement à la commande, port 15 F 

I loi"_Irtnoa_Adrosto _ 
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AU SOMMAIRE DES 
ANCIENS NUMEROS DE 




yg^pèr*****® r*«9s« 

> tfemerfeds p rp yix m xt fc c n 
k corm/wjL^rt 


Utiitaires: Supecnum. Editeur 
de textes.. JeuxNavalonc. 


(Pour les seuls numéros encore disponibles 
en mai 1986) 

NUMERO 4 

SYNTHETIS : logiciel d'accompagnement du 
synthétiseur vocal. ESSAI DE LA PHS 60 
interface PERITEL/UHF. Recopie graphique 
sur OP 50. Banc d'essai du modem DIQITE- 
LEC DTL 2000. Drapeaux : programme de 
jeu. Interfaces joystick : comparatif. 


du MONITEUR 1 .Ode LORICIELS CROCKY : 
jeu. Compte bancaire : gérez-le sur MICRO- 
DISC (11. Compatibilité DTL 2000 et JAS¬ 
MIN. 

NUMERO 11 

Hors-série rempli d'une multitude de pro¬ 
grammes en tous genres. 


NUMERO 16 


Le TELESTRAT arrive. Animation graphique 

améliorée. Musique : un choral de Bach. Elé¬ 
ments de programmation en Basic. Un jeu : 
l'Escadron suisse. Le MINITEL : périphérique 
intelligent. Deux recopies d'écran pour 
GP 100. Un logiciel pour les petits : POULE. 
Jasmin et Microdisc : ils communiquent. 

NUMERO 17 


NUMERO 6 

Essai de l'XL DOS. AUTOVERIF pour amé¬ 
liorer la fiabilité du chargement cassette. 
Essai de la carte 8 E/S MAGECO. VOICE : 
ORIC parle sans interface. RENUM-DESTRUC 
renumérotation et suppression de lignes 
Basic. Les interruptions : une horloge. 
Master-Mind : jeu. ANADIS : analyse de dis- 
quettes au format MICRODISC. La Jasmin- 
Printer (Brother Ml009) à l'essai et recopie 
d'écran pour cette imprimante. 

NUMERO 7 

BLURK’S : jeu. Editeur de caractères pour 
redéfinir le jeu de caractères. Calculs en lan¬ 
gage machine pour aller plus vite. Lecture et 
Ecriture de secteurs sur Jasmin ou comment 
réparer une disquette. Tour d’horizon des 
Moniteurs-Assembleurs du commerce. Le 
magnéto sans angoisse ou comment amélio¬ 
rer le chargement des cassettes. Essai du 
RANDOS. Essai du crayon optique. Recopie 
d'écran sur MCP 40. L'interface TVS. 

NUMERO 8 

Une alimentation secourue pour se jouer des 
coupures de courant. L'ORIC et les SPRITES. 
Un coffret pour ORIC : tout en un. Comment 
brancher ORIC sur un moniteur monochrome. 
Domptez votre MICRODISC. Modifier le 
T-DOS. Logiciel de Facturation. Implantez du 
binaire dans des DATA : CREADATA. 

NUMERO 10 

Essai du modem TONIC. Le Basic Français. 
Utilitaires pour vous plaire 11 ). Modifications 


NUMERO 12 

Ecrivez votre jeu d'aventure : COLDITZ. Le 
DTL 2000-t- un serveur pas cher. Schéma 
électronique de l'ORIC. Essai de la table gra¬ 
phique GRAPHISCOP. Le partage mémoire de 
l'ORIC. Utilitaires pour vous plaire (2). Un 
Moniteur-Assembleur. Compte bancaire 
(suite et fin). 

NUMERO 13 

Transfert du FORTH sur MICRODISC. TAN¬ 
DEM 13 un logiciel pour le DTL 2000. Jouez 
avec les couleurs de l'ORIC. Utilitaires pour 
vous plaire (3). Créer des fenêtres sur ORIC. 
MICRODISC et JASMIN : ils communiquent. 
City on Raid : jeu. 

NUMERO 14 

Le SEDORIC à la loupe. Un éditeur de carac¬ 
tères en langage machine. CONJUGAISON : 
ORIC à l'école. Sortir le son sur le téléviseur. 
Fenêtres (fin). Calculez votre Epargne- 
Logement. Scrolling latéral. Sauvegarde des 
variables avec l'ORIC-1. Un utilitaire : Super 
Désassembleur. Jouez avec les Mots- 
Cachés. 

NUMERO 15 

Une imprimante à l'essai : la MT 80S. Spiro¬ 
graphe : rosaces et arabesques. TRON les 
motos de lumière (jeu). Essai de la carte 256 
couleurs de Microfutur. Editeur de secteurs 
sur Jasmin. MUSICORIC pour que l'ORIC-1 
devienne musicien. Carte série pour liaison 
avec MINITEL. Educatif : le moteur è 4 
temps. Redéfinition de caractères pour 
EASYTEXT. 


Le TELESTRAT se présente. Transfert de 
l'écran TEXT en HIRES (1). Conversion du 
binaire en DATA. ORICTEL : logiciel d'appli¬ 
cation de la carte série Minitel Recopie rapide 
sur imprimante mode texte. Ecriture évoluée. 
LEONARD : utilitaire de dessin (1 ). Fiches de 
paye : comment calculer les salaires avec 
ORIC. Jaquettes de cassettes pour GP 50. 
Catalogue amélioré sur Jasmin. 

NUMERO 18 

Un drive 3"1/2 à l'essai. Triphonie : l'ORIC 
devient orgue. Connaissez-vous les objets 
fractals ? Le Devin : chirologie ou jeu ? Un 
jeu : Frog Panic. Pour lister un programme à 
partir du MINITEL (et de la carte série) : 
MLIST. Accordez vos instruments de musi¬ 
que avec Fréquencemètre. Text-Hires (fin). 
Léonard (suite). Deux recopies d'écran : 
GP 550 et Brother Ml009 (Jasmin Printer). 
Lister l'EPROM du Microdisc. 

NUMERO 19 

Léonard : fin de l'utilitaire création graphique. 
Modifications de l'ATMOS et du MICRO¬ 
DISC. Un mini-interpréteur. Protection du 
HIMEM. Le tri en langage machine. Jeu édu¬ 
catif : EUROP'ORIC. En savoir plus sur le 
SEDORIC. Compte bancaire : gérez-le sur 
JASMIN. Utilitaires pour vous plaire (4). 

Les articles et programmes rappelés ci- 
dessus ne forment que l'essentiel des diffé¬ 
rents numéros de THEORIC cités. Les essais 
des différents logiciels, les trucs et astuces, 
etc. sont autent d'arguments qui devraient 
vous inciter à compléter votre collection de 
THEORIC. 






























Dans un premier temps, on intro¬ 
duit la taille A(l) des huit portions 
en pourcentages, 

0 = A< A(l) < = 100, A(0) + ... 
+ A(7 = 100 

dans l'ordre des couleurs de 
l'ORIC : noir, rouge, vert, jaune, 
etc. 

Un secteur du cercle représente, 
par exemple, la participation au 
marché d'une société comme\ 
ciale. Le dessin se fait de la ligne 
500 à la ligne 590. 

Nous avons adopté le principe de 
la routine CIRCLE qui figure dans 
la ROM Basic (voir ORIC A NU, 
pages 333-337) et calculons 
d'abord le premier et dernier point 
de chaque secteur. 

A partir des coordonnées (X,Y) 
d'un point, nous obtenons le pro¬ 
chain point en posant X' = X- 
Y/R, Y' = Y + X'/R, si R désigne le 
rayon du cercle (R = 32). 

Cette méthode s'avère être beau¬ 
coup plus rapide que les calculs 
classiques qui passent par les 
fonctions trigonométriques 
sin(phi) et cos(phi). 


LE PROGRAMME 

m peu cnriF.MBFRT eu couleur 

C=B+fK 5 >*P=1=4= GOSUB 409 

20 Cl S : PR I HT « PR I UT « PR I MT 

360 Ml = l68 = M2=150 = M3=102 A=C = B=C+A<6 >tP 

25 PRI MT" M0TFZ LES POUPCEIITAGE3 DRUS 

= C=B+Af7 >rP=1=6= GOSUB 400 

1 - ORDRE DES COULEURS DE L'ORIC" 

DOKE if306, 10090 = P0KE618,3 = EMD 

30 0=0 ; FOR 1=0 TO 7 

409 REM DESSIM CAMEMBERT 

35 PRIMTCURîlK 144 + 1 >; 

419 D=1= IF B-fl >8 TMEM K=fl=L=B=GÜSOB50O 

•10 IFIMK I/'2>*2=IHT< I > TMEM PRIHTCHR*<1 

420 A$=STRH<A<I>)+"%"= CURSETM1+6,M3,3 

28+ l + l >.i ELSE PR IMTCIIP$< 128+1 -1 > ; 

430 GOSUB 60ô 

45 PRI MT "SOCIETE "il;" .. « IMPOT fl< 

440 P=2= IF C-B>0 THFM K=B = L=C = GOSOB50O 

T • 

450 fi*=STR*< AU + 1 >>+" V = CURSETM 1-36,M3, 

50 fK I "'=RBS< A< I > ) - 3=S+A< I > = MEXT 

3 

60 IF RBS< S-100 »1 TMEM PRI MT "SOMME < 

460 GOSUB 600 = RETURI1 

> 100*:" : GOTO 25 

490 REM SOUSRROGRAMME DRAW SECTEUR 

70 P=PL 5U • R=32 = L'OKE #306,#FFFF 

500 CD-RfCOSvK> = SD=R*SIM<K> = CF=R*CQS<L > 

100 REM DESS II l-FOMD 

= SF*R*SIIKL) 

110 IIIRES « PAPER 7 = IMK 3 = P0KE618,10 

510 X-1Mr<CD+.5 ) = Y= 11 IT< SD+.5) = XF= IMK CF 

120 CORSET 24,10,3 

•i.5> = YF=IUT<SF+.5> 

]30 F11 L 00,1,18 FILL 90,1,20 

520 CORSE T 11 1, M2 ■ 3 = DRAW X, -Y, 1 

14ô C» IRSET 18,100,3 • FI LL 90,1,5 

530 REFFAI 

150 CORSET 114,10,3 FILL 90,1,1 

540 X=X-Y R = Y=Y+;vR = X0= IMT(X+ .5> = Y0= 11M 

1 P.0 F 11 L 90,1,7 = CORSE T 120,10,3 

y *■. 5 > 

170 FILL90, 1, 16 = FILL 90,1,22 

559 IF 0=1 TIIEH CORSET Ml+XO#M2-Y0, 1 

2U0 CORSET 216,10,3 = FI L.L 180,1,23 

560 IF D=2 1 HEM CORSET 111,112,3= DRAW X, 

210 CORSET 30,10,2 = FILL 19,7,127 

-Y, 1 

220 Ci IRSET 126,19,3=FILL 10,7.127 

579 OUTIL ABS<X-XF)< 1 AMD ABS<Y-YF><1 

230 f l IRSET 30, 190,3 = F11 L 19,7,127 

530 IFYOOYF TMEM Y=Y+X-'R = YÛ=1MT< Y+. 5 > = 

2-19 CORSET 126, 160,3 = FI LL 10,7,127 

CORSET Ml+XO,N2-Y0,1 

?“>0 REM POURCEMTAGES-SECTEURS 

590 DRAM XO , YO , 1= RETORM 

:30O M1 = 168 = 112=60 = M3= 12 = A=0 = B=A< 9 >:#:P = C=B 

600 REM PRINT 

+fl< 1 >:f:P = I =0 1 GOSUB 400 

610 FOR L=2 1 O 1 EM< A$ > = CHHRASO: M I D*< 0$ , 

320 M1=72 = M2-60 = M3= 12 = A=C = B=C+A<2 >*P = C= 

L, 1 > ), 0,D 

B+A< 3 >'f P = 1=2= GOSUB 400 

620 CORMOV 6,0, 3 = HF.XT 

0 M1 =72 = M2= 150 = M3= 102 = A=C = B=C+ A*' 4 >:|:P = 

630 REIURII ■ 


LE C 
PRI 


AME 
•TRANC 




D 

2 


o bro* ih 7ee 

C. R»»*., 

a. _ià 



A W.LUTHER 

près avoir apprécié les camemberus vulgaris figurant 
sur le menu de l'excellent article de D. VASIUEVIC "TRA¬ 
MES ET COLLAGES", on est tenté d'affiner un camembert 
en couleurs. Mais hélas, les limitations infligées par les cons¬ 
tructeurs britanniques interdisent la coloration individuelle 
des points contigus. 

Il faut ainsi se contenter d'un camembert prétranché (voir 
photo) servi sur quatre plateaux différents. 

Sa fabrication est assurée à l'aide de la recette proposée ci- 
dessous. 
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REMCOLOR 

André GUICHARDON 


N 



I ous avons reçu une série de petits programmes créés 
par André GUICHARDON. Après les avoir testés, nous 
avons décidé de les publier, car tous ont leur place dans 
THEORIC. Le premier que nous vous proposons permet de colo- 


rier les REM. 

Il est prévu pour ORIC-1 et ATMOS. 

.6-3000 

REM 


63010 

REM 

*- 

■* 

63020 

REM 

*■ 

COLORIAGE * 

63030 

REM 

* 

DES * 

63040 

REM 

-* 

R. E . M * 

o3050 

REM 

*- 

* 

6-3060 

REM 


63070 

REM 



63080 

A= 12 

81 


63090 

B=DEEK(A): IF A>B THEN 63150 

63100 

IF PE EL 

. (A+4)=157THEN C=A + 5:G0T0 


63110 IF F'EEK (A+5) =157THEN C=A+6:GOTO 63130 
63120 A=B:GOTO 63090 

63130 IF DEEK (0 =8224 THEN F'OKE C,27:P0KE C+1,65 
63140 GOTO 63120 
63150 REM auto destruction 

63160 AD= 1281 : REF'EAT: W=ADl+2: AD1=DEEK (ADI ) : UNT IL DEEK (W) =63000 
63170 X=W-2:DOKEX,0:D0KE#9C,W 
63180 ENDB 


A mettre en place sur ATMOS, 
par CLOAD" ",J à la suite du 
logiciel à traiter ; IMerge pour 
Jasmin, et à frapper pour ORIC-1. 
Le lancement s'effectue par RUN 
63000. Ce programme disparaît 
une fois son travail terminé. Il per¬ 
met de faire apparaître en rouge 
(ou une autre couleur) les remar¬ 
ques suivant un REM de début de 
ligne, sous réserve de disposer de 
deux octets de libre entre l'ins¬ 
truction et la remarque. Dans le 
cas contraire, la ligne ne sera pas 
touchée. Il peut traiter les lignes 
précédées ou non des : après le 
numéro. Lorsque toutes les lignes 
ont été parcourues, les pointeurs 
de fin du Basic sont réinitialisés, 
et ce court programme s'auto¬ 
détruit. 



Z 


DECOUVREZ LA BETE 
A COMMUNIQUER U 


Déjà 3 serveurs : Micro Bédé : 93.80.76.28 
Télétic : 93.85.53.36 
Stéréatmo's Club : 93.08.28.44 


ARAL , c'est aussi : 

• AMSTRAD 

• COMMODORE 

• Compatible IBM 

• EXEL VISION 

• et plus de 2 300 logiciels 
Toutes les marques en stock. 




Reprise de votre ORIC pour tout 
achat d'un télestrat. 


ARAL 


22, Av. du Maréchal Foch 
- 06000 - NICE Tél. 93.92.21 85 
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Reprise de votre ancien ORtC 


Pour l'achat de l'un des ensembles TELESTRAT décrits ci-dessous 

ORIC TELESTRAT 


HYP ER - PA SIC : 

Structuré et compilé. Plus de 250 instructions qui en font le Basic 
je plus complet et le plus rapide du marché. En plus des 
instructions classiques (toutes les fonctions arithmétiques et 
logiques, structures de contrôles, gestion du son et des 
graphismes haute et basse résolution etc..on trouve la définition de 
procédures (labels), un éditeur plein écran avec commande au 
clavier, à la souris ou au joystick, scroiling avant/arrière (sur les 
listings), un jeu d'instructions télématiques (attente de 
communication, téléchargement de programmes ou de fichiers via 
le MINITEL..), des instructions de communication avec n'importe 
quel autre ordinateur via le RS 232. Entrées/sorties banalisées et 
bufférisées gérées par numéros de canaux, permettant notament le 
transfert de données de n'importe quelle entrée à n'importe quelle 
sortie. 4 fenêtres d'écran définissables par l'utilisateur. 
L'HYPER-BASIC est interfacé dans le 2 sens avec le logiciel 
TELEMATIC : une arborescence peut rendre la main au Basic, et 
un programme Basic peut appeler une fonction de TELEMATIC. 


Extensions prévues (hard et soft) avant fin 86 


Carie 80 colonnes entièrement compatible VIDEOTEX. Sortie PERITEL 
RVB. Incrustation vidéo possible. 

ORIC NET pour créer un réseau de TELESTRAT pouvant communiquer entre 
eux et partager les mêmes ressources Exemple: Un TELESTRAT maître avec 4 
MICRODISC et 4 TELESTRAT esclaves en serveurs ou autres pourront 
partager la base de données et tous les périphériques . Cela en fera le système 
multi-utilisateurs le moins cher du marché. 

MIDI : interface avec logiciels de téléchargement de séquences et de sons, 
séquenceurs, plus extension du BASIC permettant de réaliser soi-même des 
logiciels MIDI. 

MODEM avec numérotation et réponse automatiques. 

Dieilaliseur d'images VIDEOTEX fonctionnant i partir d'une caméra 
vidéo. Pour des serveurs "pros "! 

lltlflBgg CD temps réel Cartouche RAM 64k d'extension mémoire 

tlANh PROGRAMMER programmateur d'Eproms 2708 à 27512 pour 
développer les applications en ROM. 


TELEMATIC 


Le logiciel intégré qui permet de réaliser soi-même 
facilement un serveur monovoie : 

Emulation _ MINITEL Commande du MINITEL au clavier du 

TELESTRAT ou du TELESTRAT au clavier du MINITEL. 
Visualisation des pages MINITEL aur l'écran du TELESTRAT, 
mémorisation des pages VIDEOTEX sur disquette, impression de 
pages sur imprimante standard. 

Camp osition de p av es VIDEOTEX elle se fait sans dificulté 
comme avec un traitement de texte (couleurs de fond et de 
caractères, lettres simple ou double largeur et/ou hauteur etc..) 
avec la possibilité d'incorporer des graphismes. La gestion d'écran 
se fait au clavier, au joystick ou à la souris. 

ütülinn_d'arbore scences une fois les pages composées et 

nommées, vous organisez votre arborescence à votre gré : menus, 
pages écrans, pages temporisées etc.. Arborescences affichées en 
couleurs, ou imprimées. Une arborescence peut gérer plus de 1000 
pages, une disquette peut en stocker 2 à 300. 

M i c r o - s e r v e u r : Le TELESTRAT ainsi utilisé est un serveur 
mono-voie. Connecté au MINITEL, il attend la communication, 
décroche et lance le serveur. Il peut enregistrer des messages, 
raccrocher au bout d'un temps déterminé etc.. 

Borne de communication déconnecté du MINITEL, il peut 
fonctionner en mode local et un utilisateur peut interroger le 
serveur sur place, exactement comme s'il appelait au MINITEL. 
Avec une arborescence de type journal cyclique, il peut délivrer de 
l'information automatiquement, sans intervention extérieure. 

Interaction possible a vec l'HVPER.BASIC pour l'accès aux 
fichiers ou pour des applications plus sophistiquées. 


à 


Ensemble TELESTRAT n°1 


v 




- Unité central* TELESTRAT 64k 

- Unité da disquettes 3” double face MICRODISC (400k) 

- Cartouche programme TELEMATIC 

- Cartouche langage HYPER-BASIC 

- Disquette MASTER STRATSED avec de nombreux utilitaires 
et programmes exemples. 

- Les 3 manuels (Utilisation, Télématique, Index BASIC) 

- Tous les cables (MINITEL, PERITEL, Téléphoné etc..) 

- Alimentation Secteur 220V pour le TELESTRAT et le disque 



Un "kit développeurs" 

A l'attention daa constructeurs ou développeurs 
de systèmes, matériel et logiciels susceptibles de 
fonctionner avec le TELESTRAT, nous avons 
réuni un "KIT DEVELOPPEURS" comprenant 
notamment un dossier système avec tous les 
vecteurs du langage-machine, toutes les 
adresses-mémoire, un dossier technique, un 
programmeur d'EPROMS etc.. Pour tout 
renseignements, contacter Jean-Pierre MORLANE 
au 42 <1 20 02. 



Votre TELESTRAT en formule crédit ! 

Crédit è durée variable aelon le montant. Faible apport è la commande et premier versement 3 mois plus tard ! 


E n ee m Oto n'i uni tepnea 3060 F au comptant 
è le commando 402F 

Oman**atteade 200 F (fSOpun apr«a) 

T E O an vigueur au 1/7*6 : lé 24%. at pa>c*oton* 
tortaaairae 138 F . conformément * ranélé <x vtîbt 
Coût total Ou crtda 1012F (Aaa (MM atPF comprise) 

EneemCHe n'i avec mpnae 3300 F au compter* 
à la commanda aana appon 

16 meneuafoéade MO F ( V S0 fOum après ) 
T fc G en vigueur au 1/7.SS 1*34%. et pmrepoona 
«ortataaaaMF conformement à rené* du 3/7*t 
Coût total du crétSI 702 F (Aat OSA et PF comprise) 


Enaanfota n'2 une rapnaa 4/50 F. au comptant 
e ta commande 486F 

?S msnauaMede 200 F i V «0 «rte ) 

T E a en *gueur au 1/7*6 IS24% et pe*cepaone 
tortaaafcee 232 F . conformément S du X7*S 
Coût foui du créai 1S36F (4ae OS* « PF comon») 

Fnaamtxa n'2 avec monaa 4060 F auoomptant 

* «commande ?» F 

• t menauaMSede 260 F. ( V 60 pua aprSa ) 
TE a an nguar au 1/7*0 1074% « pencapcon* 
tortaaavM >14 F . cantonnement e rené* du V7*6 
Coût total ou créai Sif F lAaa OSA al PF oomprtee) 


Enaemoie n'3 aana mpnae 6660 F au comptant 
0 la commanda 4S? F 

41 m aneuaUéade 200 F. ( 1* 60 four* aprSa ) 
TlOtn vigueur au 1/7*6 :1624%. et perception* 
«art a aavee 410 F., conformément a /anété du 3/7*6 
Coût foui du ofodl 27MF .iAaa DJ4 atPf compnaaj 

E na a n fofo n i avec reprisa SMO F au compta.-* 

* la commanda 77F 

» meneuafoée da 260 F ( r 60 |ours aprSa ) 
TE G an rigueur au 1/7*6 1S24V ai parcaptiona 
fortaaavea 260 F conformément è fanéfo du V7*S 
Coût total du crédi. 1ti7F (Aaa OSA et PF comprise) 


Après acceptation de votre dossier par la Société CREG 19 Rue Lord Byron 75384 PARIS CDX08. 


SA au capital de 81 755 000 Fr. RCS. PARIS B 542052907 















































1 ou ATMOS pour 


F. 


Offre exceptionnelle 



- unité central# telestrat 64k 

- Unité de disquettes 3” double face MICRODISC (400k) 

- Moniteur couleur RVB/PKRITZL 36cm EUREKA MM14 

- Cartouche programme TELEMATIC 

- Cartouche langage HYPER-BASIC 

- Disquette MASTER STRATSED avec de nombreux utilitaires 
et programmes exemples. 

- Les 3 manuels (Utilisation, Télématique, Index BASIC) 

- Tous les cables (MINITEL, PERITEL, Téléphoné etc..) 

- Alimentation Secteur 220V pour le TELESTRAT et le disque 


- Unité centrale TELESTRAT 64k 

- Unité de disquettes 3 n double face MICRODISC (400k) 

- Moniteur monochrome vert EUREKA MV12 haute résolution 

- Cartouche programme TELEMATIC 

- Cartouche langage HYPER-BASIC 

- Disquette MASTER STRATSED avec de nombreux utilitaires 
et programmes exemples. 

- Les 3 manuels (Utilisation, Télématique, Index BASIC) 

- Tous les cables (Peritel, Moniteur, MINITEL etc...) 

- Alimentation Secteur 220V pour le TELESTRAT et le disque 


fonction sur TELES 


.ï 


EUREKA : 
PHAETEL 
VISMO : 

I.T.S. : 
E.P.V.S. : 
COGECOM 


(1) 42 81 
(1) 43 22 
(1) 43 38 
(1) 42 82 
(1) 69 04 
(1) 43 29 


IN Bureau d'etudes 90 95 
ESPACE MICRO (1) 42 80 
P.A.I. : 49 46 

DUBASQUE : 40 70 


en 
RAT: 

22 72 
17 73 
00 29 
02 41 
94 01 
55 35 
21 00 
26 10 
67 87 
08 07 


Ensemble TELESTRAT n°3 


Ensemble TELESTRAT n°2 


Périphériques 

Moniteur monochrome vert MV 12 . 1150 Souris pour TELESTRAT . 490 

Moniteur couleur EUREKA MM14 ._ 2490 Joystick type QUICKSHOT 1 _ 95 

Magnétocassette ORIC à piles ................... 350 Joystick type QUICKSHOT 2 ..................... 120 

MICRODISC supplémentaire (sans alim.) .. 1790 Cable pour imprimante parallèle .. 180 

Imprimante matricielle COSMOS 80 2890 Disquette vierge 3" double face 39 

Imprimante plotter 4 couleurs MCP40 . 990 Alimentation pour MICRODISC . 490 



Logiciels 

Disquette "JEUX D'ARCADE N I" l.tjcuxi .. 200 
Disquette "JEUX D'ARCADE N'2" <3jeux) .. 200 
Disquette "DANGEREUSEMENT VOTRE” .. 200 
Cartouche ROM ATMOS (émulation ATMOS) .. 200 
Cartouche ROMORICI (émulation ORIC I)..... 200 
Cartouche "TELE-FORTH" . 390 


Bon de commande à retourner à : 


ORIC 

TELESTRAT 


LA TELEMATIQUE EN PLUS ! 

Teleph. 42 81 20 02 Tlx. 649 385 

Démonslration et informations sur MINITEL 

.U 42 81 22 72 


ORIC INTERNATIONAL 39 Rue Victor Massé. 75009. PARIS 

r->ë- 

Je souhaite recevoir rapidement un ensemble TELESTRAT n‘ .. (cocher la configuration choisie) 

□ Ensemble n' 1 (TELESTRAT avec MICROOISC et cartouches) au pris de 3990 F. 

□ Ensemble n'2 (TETESTRAT avec MICRODISC. moniteur von et cartouches) au prix de 4750 F. 

□ Ensemble n'3 (TELESTRAT avec MICROOISC. moniteur couleur et cartouches) pour 5950 F. 

□ Accessoires el périph. (préciser) ...—. 

Je vous renvoie mon ORIC 1 □ ou ATMOS □ pou reprise 690 F. OUI □ NON □ 

□ Ci-joint mon règlement par chèque de .. (montant do ma commande . 690 F. 

■ en cas de reprise) 

I □ Je choisis de régler à réception du colis (montant de ma commande __- 690 F en cas 

■ de reprise . 100 F. de trais de contro remboursement) 

□ Je choisis de payer mon TELESTRAT à crédit selon la formule décrite ci-contre. en . 

mensualités de _ F. Ci-joint mon apport initial de . F. par chèque et les pièces 

nécessaires è la constitution du dossier 

Je bénéficierai d'une garantie totale d'un an Pièces et Main d'oeuvre sur le materiel ainsi qu’une 
maintenance gratuite logiciels (mises à |our) pendant cette période. 

■ Nom .......___.........._ Signature (des parents si client mineur) 

Adresse .-. 


Professionnels de la télématique, nous 
consulter pour RV. et démonstration 


Code . Ville . 

” joindre » toute demande de crédit un bulletin de salaire, une photocopie de pièce ddénoté, une puitmncd de 
loyer ou tfEDF/OOF. et un Relevé d'identité Bancaire pour la constitution du dossier 























































TO ^ 25 


ABONNEZ 

VOUS^H 


VAIABIE PO^ R nomé-ot 

(onenlion : 


ZiiïÙ “* a ' e J ‘ ra " 1 


ri loin» «<" thiq “* cÔRACOM, I* ; H 

Edition* SOR 35 , 7 o 

mnie su r te prochain n mols . 

Pour être P r,s ^. ( , C ° oOS parvenir avant prénorn 


abonnement 


NOf* . 

^dresse • 

, Code P°* a ' 

P°Y S . - 

Abonnement 3 ™° is 

iAbonn 
Abonn 
> Tarif 


Ville 

Signature 


s (u ne s.uf «°W . 



' avion.J» — 


LES DISQUETTES DE THEORIC 


Tous les programmes de THEORIC, groupés par deux numéros sur une disquette. Plus de perte de temps 
pour les taper... Existe pour le moment en JASMIN seulement. 

Le prix : 135 F pour les abonnés (joindre impérativement l'étiquette), 165 F pour les autres. 
Avertissement : les programmes stockés sur ces disquettes sont tels que parus dans THEORIC. A vous de les 
adapter à vos besoins et au fonctionnement sur disque lorsque nécessaire. 


N° 1 THEORIC n° 4 et 5 
N° 2 THEORIC n° 6 et 7 
N° 3 THEORIC n° 8 et 9 
N° 4 THEORIC n” 10 et 12 
N° 5 THEORIC n° 13 et 14 
N° 6 THEORIC n° 1 5 et 16 
N° 7 THEORIC n° 17 et 18 
N° 8 THEORIC n° 19 et 20 
N° 9 THEORIC n" 21 et 22 
N° 10 THEORIC n° 23 et 24 
N° HS THEORIC HORS SERIE (n° 


VOLUME : T023&24 

U TABLORIC.BAS S 
Ù MINEDIT .BAS S 
U PRTFORMA.BAS S 
U PRTFORMA.B IN S 



U 

PRTFORDA.BAS 

S 


U 

STRING .BAS 

S 


U 

CDEGRAPH. BAS 

S 


U 

TRAMDATA.BAS 

S 


U 

CAMEMBER.BAS 

S 


U 

CASSEBRI . BAS 

S 


U 

CASSEBRI.BIN 

S 


U 

CLIPDATA.BAS 

S 


U 

CLIPDEM0.BAS 

S 


U 

SING5 .BIN 

S 


U 

SING6 .BIN 

s 


U 

ECR59X28.BAS 

s 

34 SECTORS 

U 

CALCULSN.BAS 

s 

7 SECTORS 

U 

MINIPRNT.BAS 

s 

5 SECTORS 

U 

NOTECALC.BAS 

s 

7 SECTORS 

32 

7 SECTORS FREE 


BON DE COMMANDE 
DES DISQUETTES THEORIC 


20 SECTORS 
11 SECTORS 

28 SECTORS 
47 SECTORS 

4 SECTORS 
11 SECTORS 

5 SECTORS 

21 SECTORS 
14 SECTORS 
17 SECTORS 
17 SECTORS 
24 SECTORS 
23 SECTORS 

29 SECTORS 
44 SECTORS 


Je commande les disquettes 1 2 3 4 5 HS 6 78 9 10 NOM . Prénom 

Ci-joint : 135 F par disquette et mon étiquette abonné 

165 F par disquette cor je ne suis pas abonné Adresse. 


Soit au total la somme de 
que ci-joint. 


Code Postal .... Ville 
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F réglée par ché- 


























ALPES-MARITIMES 


FNAC ETOILE OU 

Centre NICE Etoile 
30, Avenue Jean Médecin 
06000 NICE 

LIBRAIRIE A LA SORBONNE 

S.N.C. SEYRAT 

23, Rue Hôtel des Postes 
42, Rue Gioffredo 
06000 NICE 

LIBRAIRIE A LA SORBONNE 

7, Rue des Belges 
06400 CANNES 
PANORAMA DU LIVRE 

LIBRAIRIE DES ECOLES 
Centre Commercial CAP 3000 
06702 ST LAURENT DU VAR 

BOUCHES DU RHONE 

LIBRAIRIE DE L'UNIVERSITE 

12 A, Rue Nazareth 
13100 AIX EN PROVENCE 

FNAC MARSEILLE 

Centre Bourse 

13231 MARSEILLE CEDEX 01 
LIBRAIRIE FLAMMARION 

54, la Cannebière 
3, Marché des Capucins 
13231 MARSEILLE CEDEX 01 
MAUPETIT LIBRAIRIE 

UNIVERS ALLEES 

144, La Cannebière 

13231 MARSEILLE CEDEX 01 

CHARENTE MARITIME 

LIBRAIRIE ARMOIRIES 

JABALOT B 

26, Rue Soinl-Yon 

17000 LA ROCHELLE 

COTE D'OR 

FNAC DIJON 

24, Rue du Bourg 
21000 DIJON 

LIBRAIRIE DE L'UNIVERSITE 

17, Rue de lo Liberté - BP 1070 
21025 DIJON CEDEX 

DORDOGNE 

BERGERAC DIFFUSION PRESSE 

37, Rue de la Résistonce 
24100 BERGERAC 

DROME 

CRUSSOL 

LIBRAIRIE 

10, Bd Gai de Gaulle 
26000 VALENCE 

EURE 

LIBRAIRIE "A LA PLUME D'OR" 

49, Rue d'Albuféra ■ BP 329 
27203 VERNON CEDEX 

EURE ET LOIRE 

LIBRAIRIE LEGUE 
AU LIVRE D'OR 

10, Rue Noël Ballay 
28000 CHARTRES 
LIBRAIRIE D. LESTER 

13 bis. Rue du Cygne - BP 124 
28007 CHARTRES CEDEX 

HAUTE GARONNE 

CASTELA S.A 
LA MAISON DU STYLO 

20, Place du Capitole 
31000 TOULOUSE 

FNAC TOULOUSE 
LIBRAIRIE DES CAPITOULS 

1 bis. Place Occitane 
31000 TOULOUSE 

LIBRAIRIE PRIVAT 

14, Rue des Arts 
31000 TOULOUSE 

GIRONDE 

FNAC 

Centre St-Christoly 
33000 BORDEAUX 

LIBRAIRIE MOLLAT 

83 6 91, Rue Porte-Dijeau* 

33080 BORDEAUX 


TROUVER LES OUVRAGES ET LES 
NOUVEAUTÉS SORACOM 
DÈS LEURS PARUTIONS 


HERAULT 

LIBRAIRIE SAURAMPS 

Le Triangle Allée Jules Milhau • BP 
9551 

34045 MONTPELLIER CEDEX 

ILLE ET VILAINE 

FORUM DU LIVRE 

5, Quai Lamartine 
35000 RENNES 


INDRE ET LOIRE 

LIBRAIRIE TECHNIQUE D'HIER 
ET DEMAIN 

4, rue Morceau 
37000 TOURS 

ISERE 

LIBRAIRIE ARTHAUD 

23, Grande Rue - BP 187 
38000 GRENOBLE 

LIBRAIRIE HAREL 

11, Rue Saint-Jacques 
38000 GRENOBLE 

FNAC GRENOBLE 

3, Grand'Ploce 
38100 GRENOBLE 

JURA 

LIBRAIRIE VIDONNE 

134, Rue de la République 
39400 MOREZ 

LOIR ET CHER 

LIBRAIRIE PILETAN 

3, Rue du Commerce 
41000 BLOIS 

LIBRAIRIE PLEIN CIEL 

Claude FANEN 

25, Ploce de la République 

41000 VENDOME 

LOIRE 

LIBRAIRIE LAUXEROIS 

40, Rue Charles de Gaulle 
42300 ROANNE 

LOIRE ATLANTIQUE 

LIBRAIRIE C. OUGUEL 
TECHNIQUE ET CLASSIQUE 

8, Place de la Bourse 
44000 NANTES 

LOIRET 

FNAC 

16, Rue de la République 
45000 ORLEANS 

LIBRAIRIE BLANCHARD 

15. Rue Bannier 
45000 ORLEANS 

LIBRAIRIE LODDE 

Angle Rues J. D'Arc et Royale 
45000 ORLEANS 

LOIRET 

LIBRAIRIE SAURET 

46, rue Dorée 
45200 MONTARGIS 

MAINE ET LOIRE 

RICHER LIBRAIRIE 

6, Rue Chaperonnière 
49000 ANGERS 

DEPOT REGIONAL DE LIBRAIRIE 
FORUM 

Centre Commercial "Les Halles" - BP 
81 I 

49008 ANGERS CEDEX 

LIBRAIRIE TECHNIQUE 

22, Rue du Puits de l'Aire 
49300 CHOLET 


MARNE 

LIBRAIRIE QUERLIN-MARTIN 
FILS 

82, Place Drouet d'Erion - BP 216 
51058 REIMS CEDEX 

LIBRAIRIE MICHAUD 

9, Rue du Cadron Saint-Pierre ■ BP 
360 

51062 REIMS CEDEX 

MEURTHE ET MOSELLE 

BERGER VICTOR 

LA GRANDE LIBRAIRIE 
13-15, Rue St-Georges 
54000 NANCY 

LIBRAIRIE "A LA SORBONNE" 
F. SCAMITZBERGER e» Cie 

12, Rué St-Dizier - BP 25 
54002 NANCY CEDEX 

MOSELLE 

RELAIS FNAC 

Centre St-Jacques 

57000 METZ 

NORD 

FURET DU NORD 

15, Place de Gaulle - BP 255 
59002 LILLE CEDEX 

FURET DU NORD 

20, Place de la République 
59200 TOURCOING 

FURET DU NORD 

21, Rue du Quesnoy 
59300 VALENCIENNES 

FURET DU NORD 

DEROME S A 

18 et 20 Avenue Jean Mabuse 
59600 MAUBEUGE 

OISE 

LIBRAIRIE QUENEUTE 

22, Rue de lo République 
60105 CREIL 

PUT DE DOME 

FNAC CLERMONT 

RELAIS 

Centre Jaude 

63000 CLERMONT FERRAND 

GIBERT JOSEPH LIBRAIRIE 

42, Avenue des Etats-Unis 
63000 CLERMONT-FERRAND 

LIBRAIRIE LES VOLCANS 

80, Bd Gergovia 

63000 CLERMONT FERRAND 

BAS-RHIN 

FNAC 

Ploce Kleber 
67000 STRASBOURG 
BERGER LEVRAULT 

23, Ploce Broglie 

67081 STRASBOURG CEDEX 

HAUT-RHIN 

LIBRAIRIE HARTMANN Paul 

24, Grande Fue 
68025 COLMAR CEDEX 

ALSATIA UNION 

4, Place de la Réunion 
68051 MULHOUSE 

LIBRAIRIE G. BISET 

35, Place de lo Réunion 
68100 MULHOUSE 

RHONE 

FLAMMARION LIBRAIRIE 

19, Place 8ellecour 
69002 LYON 
LIBRAIRIE CAMUGLI 

6, Rue de la Charité 
69002 LYON 


LIBRAIRIE DECITRE 

6, Place Bellecour 
69002 LYON 

FNAC LYON 

62, Rue de la République - BP 2239 
69214 LYON CEDEX 02 

HAUTE SAVOIE 

LIBRAIRIE INFORMATIQUE 
MONTAIG 

8, Rue Pré Benevm 
74300 CLUSES 

PARIS 

GIBERT JEUNE 

15 bis. Bd St. Denis 
75006 PARIS 

FNAC ETOILE 

26, Avenue de Wagrom 

75008 PARIS 

FNAC FORUM 

1, rue Pierre Lescot 
75045 PARIS CEDEX 01 

LIBRAIRIE PARISIENNE DE LA 
RADIO 

143, Rue de Dunkerque 
75110 PARIS 

LIBRAIRIE EYROLLES 

61, Bd. St. Germain 
75240 PARIS CEDEX 05 

FNAC MONTPARNASSE 

136. Rue de Rennes 
75269 PARIS CEDEX 06 
LIBRAIRIE DUNOD 

30, Rue Sainl-Sulpice 
75279 PARIS CEDEX 06 

SEINE MARITIME 

FNAC 

39, rue Ecuyère 
76000 ROUEN 

LIBRRAIRIE LESTRINGANT 

123, Rue Gai. Leclerc 
76000 ROUEN 

LIBRAIRIE VAN MOE 

20, Rue Thters 
76043 ROUEN CEDEX 

FERRY LES PIERRES SA 

133, Cours de la République 
76051 LE HAVRE CEDEX 

TARN 

LIBRAIRIE BOUSQUET 

22, Rue Edouard Barbey 
81200 MAZAMET 

LIBRAIRIE DELOCHE SA 

21, Rue de la République 
82000 MONTAUBAN 

VAR 

LIBRAIRIE GAY 

4, Place de la Liberté 
83000 TOULON 

VAUCLUSE 

LIBRAIRIE AMBLARD 

10-14, Portail Matheron 
84000 AVIGNON 

VIENNE 

GIBERT J. LIBRAIRIE 

9, Rue Gombelîa 
86000 POITIERS 

LIBRAIRIE DE L'UNIVERSITE 

70, Rue Gombetto - BP 109 
86003 POITIERS CEDEX 

HAUTE VIENNE 

LIBRAIRIE BARADAT 

*8, Place St. Pierre 
87100 LIMOGES 

ESSONNE 

NIOCHAU-MARECHAL 
LIBRAIRIE DU LYCEE 

100, Grand-Rue 
91160 LONGJUMEAU 

VAL D'OISE 

LIBRAIRIE POCHOTHEQUE 
LECUT PIERRE 

2, Rue Stalingrad 

95120 ERMONT 29 


EN SAVOIR PLUS 
SUR LE 




(JASMIN) 



Hervé JANOD 


Jusqu'à l'apparition du 
SEDORIC pour les lecteurs 
Microdisc, le FTDOS restait le 
meilleur système d'exploita¬ 
tion des lecteurs de disquet¬ 
tes conçus pour ORIC, celui du 
fameux lecteur JASMIN 
conçu par TRAN. 

ORGANISATION GENERALE 
DES DISQUETTES 

Les disquettes 3 pouces desti¬ 
nées aux lecteurs JASMIN sont 
toujours formatées de la même 
manière, à savoir en 41 pistes de 
17 secteurs, soit un total de 
41 x 17 = 697 secteurs. 

Mais, comme pour tous les DOS, 
certains secteurs stratégiques 
(décrits plus loin) sont occupés 
dès que la disquette est initalisée. 
Pour le FTDOS, deux secteurs au 
minimum sont occupés. Il reste 
donc 695 secteurs libres, et c'est 
bien le chiffre annoncé lors d'un 
!CAT'' " d'une disquette vierge. 

LES UTILITAIRES 
PROPOSES 

Ce sont les mêmes que ceux pro¬ 


posés dans THEORIC n° 19 dans 
l'article «En savoir plus sur le 
SEDORIC». Le premier est l'utili¬ 
taire de DUMP 256 octets (listing 
1 ) et le second permet de lire les 
secteurs voulus puis de les «dum- 
per» (listing 2). 

SECTEURS STRATEGIQUES 

1) Secteur système : piste 20, 
secteur 1 

Octets 00 à 7A : Bit Map. Cha¬ 
que bit représente un secteur. 
Une piste est représentée par 3 
octets de la manière suivante 
(voir exemples 1 et 2) : 

Octets F8 à FF : Nom de volume. 

2) Directory : piste 20, secteur 2 

Octets 00 à 01 : Contient 00. 
Octets 02 à 03 : Contient 00 
lorsque pas d'autres directories 
n'existent. Contient piste et sec¬ 
teur du directory suivant. 

Octets 04 à FF : Stockage de 14 
postes du directory. 

De 00 à 01 : Piste et secteur du 
descripteur. 

02 : Type protection Unlock ou 
Lock. 

De 03 à 0A : Nom du programme 
éventuellement complété par des 
blancs. 

0B : Contient 2E hexa, soit le 
code ASCII du .(point). 

De 0C à 0E : Extension. 

0F : Type du fichier/programme : 
Séquentiel ou direct. 

De 10 à 22: 



Nombre de secteurs 
occupés, y compris les octets 
servant de descripteur (voir 
exemples 3 et 4). 

Dans le cas où plus de 14 
fichiers/programmes existent, un 
autre secteur est occupé pour le 
directory. Contrairement au 
SEDORIC, ce n'est pas toujours 
le même secteur qui est occupé 
pour poursuivre le secteur du 
directory principal. Sa description 
est la suivante : 

Octet 00 à 01 : Piste et secteur 
de ce secteur (pour contrôle ?). 
Octets 02 à 03 : Contiennent 
FFOO lorsque ce secteur de direc¬ 
tory est le dernier. 

Piste et secteur du directory sui¬ 
vant. 

Octets 04 à FF :jStockage de 14 
postes de directory. Identique au 
secteur décrit précédemment. 
Description d'un secteur conte¬ 
nant le descripteur (exemple 5). 
Octets 00 à 01 : si FFOO : pas de 
suite, sinon piste et secteur du 
secteur suivant pour la descrip¬ 
tion. 

Octets 02 à 03 : Adresse du 
début du fichier. 

Octets 04 à 05 : Adresse de fin. 
Octets 06 à FF : 125 fois 2 octets 
indiquant pistes et secteurs où se 
trouvent les données. 

Autres secteurs de description 
(s'ils existent) : 

Octets 00 à 01 : Piste et secteur 
du descripteur suivant. 

Octets 02 à FF : 127 fois 2 octets 
indiquant pistes et secteurs où se 
trouvent les données. 
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nombre de 42 plus 4 utilitaires 
(Format, Bkp, Copyl, Tkd). Peu 
d'informations, pour ne pas dire 
aucune, n'ont jusqu'à présent été 
divulguées quant à l'adresse de 
branchement de chaque fonction. 
J'ai donc été amené à désassem¬ 
bler complètement le FTDOS 
(16 Ko !) et à l'étudier, ce qui m'a 
amené à trouver les adresses tant 
recherchées et que voici : 


REMARQUES 


• Dans le cas d'une disquette 
vierge, tous les secteurs sont 
remplis de 256 octets de valeur 
6C hexa. Si la disquette est ini¬ 
tialisée, alors les secteurs straté¬ 
giques contiennent : 

— Secteur système : contient la 
Bit Map ainsi que le nom du 
volume, comme si des fichiers 
existaient (exemple 2). 

— Secteur du directory : Con¬ 
tient la valeur 00 dans les octets 
00 à 03 et la valeur FF dans les 
octets 04 à FF. 

• Si la disquette contient le DOS, 
celui-ci occupe 62 secteurs (cas 
du JASMIN 1 à adapter au 
FTDOS mixte JASMIN 2 et 2 + ). 
Ces 62 secteurs sont situés au 
début de la disquette : pistes 0, 
1, 2, 3 complètes. 

Mais si on examine le secteur du 
directory (exemple 6), on s'aper¬ 
çoit que le DOS commence piste 
6 et secteur... 0 ! C’est pour 
cette raison qu'il est (jusqu'à pré¬ 
sent) impossible d'effacer le DOS 
d'une disquette, sauf en la refor¬ 
matant. Une solution par pro¬ 
gramme vous sera proposée ulté¬ 
rieurement afin de remédier à 
cette lacune. 

• Lors d'une opération de sup¬ 
pression d'un fichier/programme 
par l'opération IDEL, seul le direc¬ 
tory est affecté. Donc il est tou¬ 
jours possible de récupérer un 
programme malencontreusement 
détruit, mais avec de la patience ! 


LOAD 

DEL 

COPY 

CLOSE 

TAKE 

APND 

CAT 

LCAT 

WL 

MLOAD 

LOCK 

START 

MOUNT 

INIT 

RS 

HELP 

ERR 

WHERE 

MERGE 

FS 

SAVE 

RENAME 

OPEN 

WRITE 

JUMP 

CUT 

REWIND 

MSAVE 

WUL • 

CREATE 

UNLOCK 

UNSTART 

DEMOUNT 

DNAME 

WS 

MASTER 

ERSET 

EROFF 

SEARCH 

HSCR 

LSCR 


C445 

C4B9 

D635 

DCA7 

E3F8 

E0F8 

D48B 

D49A 

DE24 

F87E 

C4E6 

F5BE 

D621 

C2CD 

E7D6 

F316 

DEC2 

F4BF 

FO A 5 

F329 

C9BA 

D243 

DD84 

E3F2 

F4DB 

Fl 67 

DCBA 

F835 

DE1C 

DA4A 

C4DE 

F5D9 

D3CD 

D68D 

E7A0 

CECI 

DEB2 

DEBA 

CFBA 

E404 

E40A 


Le listing 3 est le désassemblage 
commenté du mini-interpréteur 
du FTDOS. 


TOUT SUR LES 
FONCTIONNS DU FTDOS 


COMMENT RAJOUTER 
DES FONCTIONS AU FTDOS 


plus de place disponible pour 
l'ajout de nouvelles fonctions. Il 
est donc nécessaire de réaména¬ 
ger la routine de branchement à 
chaque fonction (voir listing 3) et 
de changer la valeur de quelques 
octets. Le résultat est donné.lis¬ 
ting 4 et le programme qui crée 
ce réaménagement est listé lis¬ 
ting 5. 

Le programme listé listing 5, 
outre le réaménagement du DOS, 
rajoute deux nouvelles fonctions 
au DOS 3-2 livré avec le JASMIN 
1 uniquement. 

Ces fonctions sont : 

— !OLD : Récupère un pro¬ 
gramme Basic malencontreuse¬ 
ment effacé par la commande 
NEW. 

— !DOS : Efface le DOS d'une 
disquette le contenant. Si le DOS 
n'est pas présent sur la disquette, 
l'ORIC affichera le message : 
SYNTAX ERROR. 


Afin que les possesseurs de 
Microdisc avec la version du DOS 
VI. 1 ne soient pas défavorisés, 
je donne également le point d'en¬ 
trée des routines de ce DOS. 



,w’l» 

. - - ii 

/ii i/i»,/ - , 

- '< 


LOAD 

PUT 

DIR 

PROT 

STORE 

RECALL 

REN 

BACKUP 

PRINTER 

SAVE 

FORMAT 

DEL 

GET 

OPEN 

DRV 

COPY 

CLOSE 


El 35 

E3FE 

E61D 

EA1 F 

FEB7 

FADA 

FB4C 

EDEO 

EEEB 

D94F 

FF28 

EA1 5 

ED42 

FADA 

FE71 

FB4C 

EC9B 


Pour les amateurs voulant analy¬ 
ser le mini-interpréteur de ce 
DOS, sachez que, par exemple, 
la commande FORMAT est 
codée : 8D 4D 41 54 00, soit : 

— 8D code de FOR 

— 4D code de M 

— 41 code de A 

— 54 code de T 

— 00 code de fin de mot. 


Les fonctions du FTDOS sont au Le seul problème est qu'il ne reste 


Bonne chasse... 



LISTING 1 

5 REM DUHP OR 1C 256 OCTETS 

10 CLS :L IGNE=100:C r ! 5*0 

15 PRIN1 " JMPRESS 10m (Tvn; •• 

20 R£“tftT:3ET2*:UNTIL?«*"C" C? ?« = Tl" 

25 I F ?i- 0 ' T u £n PPk£h?F1, 48? 

2 Z FCP ! =SBRPPTf. 3R8£p 

25 F£-iCLS :C-C>TL. 5 -L* . :CMK S-CHK 3»û*C :C 

«c» ; ;rCf t :, 

FC ! F C-I7)KHI'R;n*“'. are “ ;L i'îriE Che 
et* si ».t = ' i Chk C :L i ü.\E =L 1 GnE * 10 : CHK 3-O :C = 1 
F? n£X* 1 

50 hOK. 1T s 2 - 1 , g /T :PF. INT Taper 3 pour Sauu, 
*r,autre touche pour Ar r e t « r ” ; : GE T ?S 

51 PP 1 Ni :PR ! N t ADAPTATION ORtCi-ATnQS 

•' :IFP££K(«FFF£) O«a0 THEN55 

52 C CK £ oBE:CC , BFT3F :CCK£S88CF. BF5/E :QOK£ 

4E8C0, «F52B :Q0K£ii98£2.8F5/6 

55- 1F 2s <> " 3 Tp£n£nO 
60 SS6UE "OL'TIP. 81 N, «8800,4B8EF ' :£NC 
-100 DATA 69,B6,85,02,69,BB,85,03.62.0C, 
86,02,22,2C,F2,65 

110 OA'A 01,F0,03,20.06,B8-65,05,20,62, 
B8,05,0F,20,62,88 

120 OATP P5.01,F0.03,20,OP,B8, P3,F8,85, 
02,P9,BB,85,03,62 

130 OPTA 15,65, 0F, 20,62,88,69,9F,20,BP, 
B8,60,00,98,29,01 

1F0 C6T6 F0,e2,69,80,85,06,61,0F,20,62, 
B8,C8,CF,02,00,£0 

150 06T6 86,00,06,60,10,69,10,20,86,68, 
88,00,FS,69,00,85 

160 DATA 06,69,9i,20,66,88,60,00,61,0F, 
C9,20,90.0F.C9,2£ 

120 DATA 90,02,69,2E,20,66,68,C8,CF,02, 


00,EC,65,0l,F0,03 

100 DATA 20,06,68.CA,F0,08,10,06.69,12, 
20,66,68,60,69,0F 

190 DATA 85,02,18,65,0F,59,0C,85,0F,A5, 
05,69,00,85,05,FC 

200 OPTA 31,B8,F8,F6,46,46,46,20,B:,B8, 
68,29,0F,20,8!,e8 

210 OPTA 60.C9,06,90,03,18,69,02,59,30, 
84,00,05,06,60,00 

220 OPTA 9!,e2,AF,01,F0,0S,29,2F.C9,20, 
60,02,69,20,20,Cl 

230 DATA F5,6F,00,£5,02.00,00,E6,03,60, 
69,00,20.Cl,F5,69 

2F0 DATA 06,20,Cl,F5,60,EA,£A,£6,£A,£6, 
EA,£6,£A,E6,E6,E6# 

Ca qui «St souftgné eet ce qui change par rap¬ 
port au listing publié dans THEOfHC n 9 19 


Checksum das lignas da OATA 


L i 9 ne 

100 

Ch 

eck 

Sum = 

15503 

L l 9 ne 

1 10 

Ch 

eck 

S um = 

15293 

L i 9 ne 

120 

Ch 

eck 

S um = 

12549 

L i 90e 

130 

Ch 

e c U 

S urr = 

13623 

Ligne 

140 

Ch 

e ck 

SL»rri = 

19125 

Ligne 

150 

Ch 

eck 

cum = 

12910 

Ligne 

160 

Ch 

eck 

s um " 

15248 

Ligne 

120 

Ch 

eck 


12264 

Ligne 

180 

Ch 

e c k 

surr> = 

13938 

Ligne 

190 

Ch 

eck 

SUffl = 

883! 

Ligne 

20 e 

Ch 

eck 

Suffi 3 

13828 

Ligne 

210 

Ch 

eck 

SUfns 

2480 

Ligne 

220 

Ch 

eck 

SUff : 

13516 

L i 9ne 

230 

Ch 

eck 

SUffl = 

12181 

Ligne 

240 

Ch 

eck 

Suffis 

30422# 


LISTING 2 

10 RET1 PROGRAnnE RWSECTOR 

20 REM Lecture d’un secteur 
30 REM avec FTOOS 3-2 

F0 REM 

50 REM Utilisation du programme 
60 REM DUMP 

20 ’ 

80 GRAB :HIMEMW8FF0:CLS 
90 SLQAO"DUMP. BIN" 

100 NP=40:NS=18 
110 GOSUB 1000 

120 INPUr'PISTE, SECTEUR" ;P, S 
130 IFP7NP OR P<0 OR S>NS OR S<1 THEN 1 
20 

140 P0KEH48C,1 :P0KEMF80,P:P0KE»F8E,S:00 
KE448F,«9100 :9RS 
150 DOKEF,49100 :CALL#8800 ’DUMP 
160 PR1NT"PISTE " ;P;" SECTEUR “;S ;” 
CESC, S, P, I)'' 

120 GETAS :IFA*=CHR$C221 THEN END 
180 IF A$="I" THEN GOSUB 1800 

190 IF AS="S" THEN S=Srl 

200 IF A$="P" THEN S=S-1 

210 1F S<1 THEN S=17 :P=P-1 

220 IF P<0 OR P>NP GOTO 120 
230 IF 6$="S" OR AS="P“ OR AS=”I" THEN 
1 40 

240 GOTO 120 

1000 PR INT"IMPRESSION DU DUMP (0/N) ?" i 
:GET2S 
1010 PRINT 

1020 IF 2$<>"0"AN02S <>"N” THEN PRINT :G0 
TO 1000 

1030 IF 2$="0"THENPOKE1,1ELSEP0KE1,0 
1040 RETURN# 


LISTING 3 


TABLE DES TYPES ET DES MOTS-CLES 


E 101 : 

42 

41 

03 

42 

43 

CE 

53 

59 

B6S3:NSY 

E 109 : 

03 

43 

40 

C4 

54 

58 

Ü4 

44 

SCMOTato 

Elit: 

4 1 

04 

4 l 

52 

09 

53 

a3 

02 

6TARTSCR 

£119: 


00 

55 

55 

53 

55 

53 

52 

* . UL'LUUU 

£121 : 

52 

49 

54 

C5 

54 

4 ! 

ae 

C5 

R1 t £T6KE 

El 29: 

4* 

55 

40 

00 

4 ! 

50 

Ai 

Ca 

JUMT6FNC 

E ! 31 : 

43 

55 

04 

52 

45 

5? 

a9 

a£ 

CL'TREhIN 

£139: 

CF 

4F 

50 

45 

CE 

52 

CC 

52 

OOPENWLLI 

£14! : 

55 

CC 

43 

52 

aS 

4 ] 

5 4 

r e 

ULCRE6TE 

£149: 

4: 

4C 

4F 

53 

C5 

40 

53 

A 1 

CLOSE ISA 

£15: : 

5ô 

C5 

40 

4C 

4F 

4 1 

Ca 

53 

UEMLOAQS 

E : 59 : 

4 ! 

56 

CS 

4 C 

4 F 

4 1 

Ca 

aj 

AUEL3ADC 

£15: : 

4 . 

04 

4 C 

43 

4 ; 

04 

52 

4 5 

6TLC6 t RE 

E : 69 : 

4 £ 

4 1 

40 

C5 

4? 

4 4 

50 

09 

NAi'i^rcPT 

E ; 2 : : 

44 

43 

CC 

4 C 

4£ 

43 

CS 

55 

0£ll.33KL 

El 29: 

4 £ 

4C 

4f 

d 3 

GE 

53 

54 

4 i 

NL OC*. S TP 

E 18! : 

32 

04 

c r 

> -j 

4£ 

5 

'5a 

<1 

52 

R TLN‘2 TAP 

E :F3 : 

Z ~ 

4C; 

«F 

55 

4£ 

> 

44 

4£ 

"MOUIION 

£ ; 3 i i 

4 ; 

FC 

C5 

43 

4£ 

49 

2 4 

52 

ame :m t r 

El 99: 

PT 

52 

0? 

40 

4 ; 

53 

54 

45 

SUS^ASTE 

E ! A; : 

Ci 

44 

4 5 

40 

a ? 

55 

4£ 

Da 

R3£ m Cl'nT 

E !62 : 

4 - 

03 

48 

4 5 

4 £ 

00 

4; 

52 

0?H£u J ER 

£ IS . : 

= 1 

4 ^ 

04 

45 

52 


4 5 

~ A 

se-£-..:f- 

£163: 

4 5 

52 

Û2 

j? 

4£ 

'* 5 

52 

Zi 

ERRT.’-’ERt 

e : c : ; 

53 

45 

4 ; 

52 

«3 

C3 

45 

a î 

SEAR :hte 

£ ! C3 : 

52 

47 

C5 

4Ê 

CT 

4 3 

C7 

4 C 

PGEhSTRL 

£ 1JI : 

53 

43 

02 

46 

D3 

ec? 

U 

4 

SC RF F. R . 

£ :G3 : 

C \ 

43 

32 

09 

« 3- 



a: 

SCR. « _ J 

E:£ : : 


55 

55 

55 

35 

-- 

5 : 

5: 

lîLllll'-il 


valeur > #7F indiqua la fin du mot-clé 


32 


















TABLE DES BRANCHEMENTS 

AUX FONCTIONS 


£480 

4C 

F2 

£3 

Jl» 

FE3F2 

WRITE 

£431 

4C 

F8 

E3 

jr -p 

*£2F8 

TAXE 

E486 

4C 

DB 

F4 

jn= 

*F403 

JUMP 

E489 

4C 

F8 

E0 

jrp 

*£0F6 

APND 

E48C 

4C 

67 

Fl 

jn ? 

*F;6? 

CUT 

E48F 

4C 

BA 

OC 

j rp 

*CCB« 

RE WIN D 

£492 

4C 

84 

00 

jîip 

îco8<= 

OPEN 

E495 

4C 

24 

OE 

ji-p 

*C£24 

WL 

E438 

4C 

IC 

OE 


fOE ! C 

WUL 

E49B 

4C 

48 

00 

j-ip 


CREATE 

E49E 

4C 

87 

OC 

jr.° 

*DCA7 

CLOSE 

£4*; 

4C 

35 

F8 

jrp 

*F835 

NSA VE 

E4A4 

4C 

7£ 

F 8 

jrp 

tr 87E 

N LO AO 

£487 

4C 

84 

CS 

jn° 

tC9B4 

SAVE 

E4AA 

4C 

45 

C 4 

jrp 

*C4«5 

LO AO 

E4AC 

4C 

88 

04 

jn° 

t0483 

CAT 

E4B0 

4C 

94 

04 

jrp 

$C494 

LC AT 

£463 

4C 

43 

02 

„HP 

t02<=3 

RENAME 

£43c 

4C 

35 

06 

jrp 

tC635 

COPY 

E4B9 

4C 

89 

C4 

J HP 

*C4B9 

DEL 

E49C 

4C 

£6 

C4 

jr p 

SC4E6 

LOCK 

E4BF 

4C 

OE 

C4 

jrp 

îC40£ 

UNLOCK 

E4C2 

4C 

B£ 

F5 

jrp 

sFSBE 

START 

E4C5 

4C 

09 

F5 

jn= 

tr 509 

UNSTART 

E4C8 

4C 

2! 

06 

J HP 

$0621 

NOUNT 

E4CB 

4C 

8C 

06 

jrp 

*Q6SJ 

DNAME 

E4CE 

4C 

CO 

C2 

j«P 

tC2C0 

INfT 

E4DI 

4C 

06 

E7 

.rjP 

t£7C6 

RS 

E4C4 

4C 

A0 

E7 

jrp 

*£7A0 

WS 

E407 

4C 

Cl 

CE 

jrp 

tcEc: 

MASTER 

E4DA 

4C 

CO 

03 

jr* 

*Q3C0 

OENOUNT 


E4QC 


4 C 


-7 

J MF 

*£7CA 

OS 

E4£2 


4 C 

16 

F 3 

J 

* *■ 3. ê 

HELP 

£4£3 


«c 

B2 

CE 

jr= 

*0£32 

ERSET 

£4£6 


4C 

B0 

CE 


i 'Z E. S ^ 

EROFF 

E4E9 


4 C 

C2 

OE 

j rP 

*0£cr 

ERR 

E4EC 


4 C 

8- 

F4 


* F 43F 

WHERE 

E4E- 


4C 

B4 

CF 

/■<> 

*Cf 64 

SEARCH 

E4F2 


4C 

f\i 

F 3 


tF.’fli 

MERGE 

E»F5 


4 C 

Z* 


r;o 

*£43$: 

H SC R 

E4F3 


4C 

04 

£4 

J“° 

S E“04 

LSCR 

E4FB 


4C 

29 

F 3 


*- 329 

FS 





a a a a 







LISTING 4 



IO184-D1B0 







0184 : 

00 

04 

00 

LO0 

$0004 


0187: 

8 G 

9E 

01 

_SJA_*0J9E 


0180: 

AD 

05 

00 

LD0 

$0005 


D18D: 

88 

9F 

01 

ST0 

$019F 


0190: 

0D 

06 

00 

LO0 

$0006 


0193: 

80 

08 

00 

ST0 

*0008 


0196: 

02 

00 


LOX 

«$00 


DI 98: 

EC 

08 

D0 

CPX 

*0008 

passage du mode absolu 
au mode Indirect 

□ 1 9B : 

90 

03 


BCC 

*01A0 / 

0190: 

6C 

B0 

E4 

jrp 

C*£4BA) i ‘ r 


0100: 

00 

02 


LDY 

M*02 w 

*019E 


DI 02 : 

EE 

9E 

01 

INC 


DI05 : 

00 

03 


BNE 

*D 1 OP» , , „ . 

il n y a donc plus que 2 octet* 

*01 9F 

0107: 

EE 

9F 

01 

INC 

0100: 

88 



OEY 




01 0B : 

00 

f5 


BNE 

*01A2 


0100: 

E8 



INX 




D10E : 

4C 

98 

01 

jrp 

*0198# 



Table des adressas : plue que 2 octets/mot- 


0E48C 

E480 

clé 

I-E4D7 

F2 E3 

F8 

E3 

OB 

F 4 

F8 

E0 

r cxcllx 1 

E488 

67 

Fl 

BA 

OC 

84 

00 

24 

DE 

94 ]*" 

E490 

IC 

OE 

4A 

DA 

A7 

OC 

35 

F8 

.~J2’\5x 

E498 

7E 

F8 

BA 

C9 

45 

C4 

8B 

04 

. x:IEO.T 

E4A0 

9A 

04 

43 

02 

35 

06 

B9 

C4 

. TCR5U90 

E4A8 

E6 

C4 

OE 

C4 

BE 

F5 

09 

F5 

f 0 / '0>u Yu 

E4B0 

21 

06 

8D 

06 

CO 

C2 

D6 

E7 

!U.unBU9 

E4B8 

A0 

E7 

c : 

CE 

CO 

03 

CA 

E7 

9 ANIISJ 9 

E4C0 

16 

F3 

84 

E3 

A3 

E3 

B2 

DE 

. s. c«c2 /> ' 

E4C8 

BA 

OE 

C2 

OE 

BF 

F 4 

BA 

CF 

:-B*?t :0 

E4O0 

45 

F0 

04 

E4 

0A 

E4 

29 

F3 

xp . d. dis 


• • • # 


USTINQ 5 

1S RW — .. .. 

28 RW - ■ 

30 RW - PROGRAml CHANGE • 

4# rw • • 

sa rw - nooirtc a rroos 3-3 
04 rw - - 

78 RW - • HfRUI JANOQ 1300 

90 RW - 

sa rw — .———.— 

iea fwcRair»OiOOKca74C.?oaiCLS 
no priht ■ rnPLowr«riOH or la routinc* 

170 MininaaffT 
ISO RWC Mir-W1(B») 

140 5-«<J*9 
ISO RIAO A* 

100 RIPCAT 

170 i *0*1 TO.UALCa'-Aa) 

i ta i s*S’iML(*a*'A«)tj 

130 « J-J*l 

200 : *1 AO A4 

no uftil A4--a- 

720 ir S O 000303 rWIM PRlHT’tRRfUtS POU» US DATAS CI L’AORISU 'lOaitKJ 

770 5-0U*O 

740 RI AO SatfUALTM) 

730 Rf AO A» 

780 RWIAT 

770 • POKI tO.yA4.Cf.A41 

700 > s*s»UAcca # »A4jaj 

730 i J»J»I 

300 ; RtAO A* 

310 UNUL Aa-*I* 

370 IF SO0133779 tNCN PF(NT'ERREURS POU» US DATAS 01 L*AO*£SSI 'iBtiOO 
330 PR INI" IMPLANTATION T1RTUNH" 

340 PRlMtiPRtNCSAUUICARCt OC LA ROUI [Kl 7 (O/HJ'j 
3sa ut iairriao'0*AN0i»o’MTnCM340 
seo tr ia-' 0 *fMiN cosou .«a 

170 PRIMT iPRINT'APPCL OC LA ROUTINE' : CAL La3000 


300 PRIHT sPRlNTTRIPAREl U« OISQUCrri Ut CRU PCLR LA MJUCCMS1 OU KXJUIAU DOS 

390 PRrNriPRwr'APPirrn su» lkc raucx ois oui vous cris prit*; 

4 M ut îaiPRtNt 

410 tNPut'MOn oc uotrc DOS- ;nom 
470 IHAStCRlOia 

430 PRIHT iPRTNT'UOTRI «UUCAU ODS CST OPIRAMO^IL* 

440 OC 

430 DATA 43OO0 

480 DATA 78.A3,7f.BO.OC.03.A3.01.OO.FA.03.CA.IA.A0,33.03.FF.3F,33.AC 
470 OAIA II.»8.00,F7.AO.73.03.38.80.33.3t.13.88.CI0.F7.Aa,O0.B3.CC.60 
480 DATA 33.7F.C4.88.00.F7.A3,07.80.Al.01.A9.8C.80,90.01,A3,00.80,70 
430 DATA 03.A3.18.00,73.03.A3.73.80.7A.03.A3.00,80,FA.83.A3.CO.80,OC 
300 OATA 03.38.80.33.33.33■33.33,33.33.33.40.34,44,4F.33.70.33.30.*3 
318 DATA 43,49.41,CC.30.4F,33,32.70.40,41,33,40.a 
370 DATA 4 8.780 

330 OATA 4F,4C.C4.44.44.4F.03.43,37,33.43.04.43.37.4F,40.ce.43.37.07 
340 DATA 37.40.43.37.C3.33.43.41,37.43, CO. 40.43.37.47.C3.40,33.43.07 
330 DATA 4C.33.43.07.40.03,00.07.4C.33.43.07.00.80,0A.C0.78.4C.C7.A3 
360 DATA FF,A0.0A.33.00.FC.88.10.FA.A9.01.OO.07.FI.80.83.FC.80.08.FC 
370 OATA 80.W.FI.30.4e.C7.4C.47.C3.40.34.44,4F.33.70.33.30.43.43.43 
380 DATA 41.CC.30.4F.33.37.78.4A,4|,33,40,43.U.80.30.31.13.38.34.70 
330 DATA 34.37.«1.41.78.08.*8.43.37.38.43.30.4A,4|.41,4F.C4.4F.C4.A3 
CRR OATA 03,80.11.83.80.07.03.A9.C3.80.43,04,80.21.04,A3,3F,80.«4.0« 

810 OATA A3.47.00.78.04.4C.«0.84.IA.78.A3.81.80.07.C8.A3.14,80.03.C8 
830 OATA A3.87.00,0A.ea.A3.0a.eO,O».C0.A0.O0.A9.fr.93.8O.F£.ee.00.FA 
830 DATA 70.4C.C7.«C.08.14,33.F3.13.F8,13.W.F4,F8.C8.87,F1,8A,0C.8« 

848 DATA 0O.74.U.IC.OC.4A.OA.A7.0C.33.F0,7C.rs,0A.C3.«3.C4.B8.04.3A 
830 OATA 04,43,07.13.08,B3.C4,18.C4,OC.C4,81.F3,03,F3.71.08.00.08.CO 
880 DATA C2.08.Î7.40.C7.CI.CC.CO.03.CA.17.18.F3.84.13.A3.£1.87.01.8A 
878 DATA OC.C2.OC.8F.F4.BA.CF.A3.F0.84.C4.8A.I4.39.F3.AO.18.FI.C3.33 
880 OATA FO.04,I8.4C.33.OO.AO.II.FC.C9.33.O0.r3.4O.l7.FC.C9.33.O0.CC 
890 OATA A3»FF.80.84,FI.70.48.C3.A3.01.<C.14.Cl.CA.IA.33.33.» 

700 PRIHT itNPUT'NOrt 01 SAUUICAROI * iNOfla 
710 HOna-HOna.-.BlM.a3000.«6»so- 
770 iSAuCHOna 
730 RCTURH 


• • • • 


EXEMPLE 1 

9100 Pi»t. 9 

00 0F0000FFFF01FFFF01FFFF01 
0C FFFF01FFFF01FFFF0IFFFF01 
18 FFFF01FFFF01FFFF01FFFF0I 
24 FFFF01FFFF01FFFF0IFFFF01 
30 FFFF01FFFF01FFFF01FFFF01 
3C FF 7F00FF FF01FFFF01FFFF01 
48 FFFF01FFFF01FFFF01FFFF01 
54 FFFF01FFFF01FFFF01FFFF01 
60 FFFF01FFFF01FFFF01FFFF0! 
6C FFFF0IFFFF01FFFF01FFFF01 
78 FF FF 01 808080808080808080 
84 808080808060808080808080 
90 808080808080808080808080 
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3C 8PtBBH0BC'1H0Bfl8l-iHG3BÜBÜbiJBO . 

OH B0BP1B0P.0B0B0B0BOB0B0B0B0 . 

EM B08«B0P«B0B0B08M80B0bMB^ . 

C0 B08080B0B060B08080H08080 . 

CC 808080808080808080808080 . 

08 808080808080808080808080 . 

E4 808080808080808080808080 . 

F 0 B08080KOB0B08H80 5452-» 1 56 .1 KOU 

FL 4 H > J4(.7<j Nom do volume 


Piste 20 
Secteur 1 


0 F & 0 0 0 

0000 1111 0000 0000 0000 0000 

Bit Map Piste 0 : 

Les secteurs libres restant sur cette piste sont 
les secteurs E. F. # 10, # 11 et donc 14 à 17. 
Voir le catalogue correspondant à cette dis¬ 
quette. Exemple 3. 

• • • • 

EXEMPLE 2 


#11 

J 


1111 1111 

/M 

secteur A B C 0 E 




2 

F F 
1111 1111 

2345 6789 f- secteurs 
1 

0000 0001 

V 

secteur 1 


9 1 00 Piste 0 Piste 1 1 £ 

00 ,FFFF0!,FFFF61, FFFF0IFF'FFOI 
0C FFFF01FFFF01FFFF01FFFF01 
18 FFFF01FFFF01FFFF01FFFF01 
24 FFFF01FFFF01FFFF01FFFF01 
30 FFFF01FFFF01FFFF01FFFF01 

3C iF F 2F 0tlFFFF01FFFF01FFFF01 

Piste 20- -> ' - 1 

48 FFFF01FFFF01FFFF01FFFF01 


54 FFFF0IFFFF01FFFF0IFFFF01 . 

60 FFFF01FFFF01FFFF01FFFF0! . 

6C FFFF0IFFFF01FFFF01FFFF01 . 

28 FFFF01808080808080808080 . 

84 808080808080808080808080 . 

90 8G8080808080808080808080 . 

8C 808080808080808080808080 . 

08 808080808080808080808080 . 

B4 808080808080808080808080 . 

C0 808080808080808080808080 . 

CC 808080808080808080808080 . 

D8 808080808080808080808080 . 

£4 8080808080808080809080HH . 

F0 8080808080808080 564 94552 .U 1ER 

FC 42452020 


Nom du volume 


Pisle 20 
Secteur 1 
Disquette vierge 


Bit Map Piste & 


F 

1111 


F 

1111 


F 

1111 


GE 


F 0 1 

1111 0000 0001 


Tous les secteurs sont libres 


Format Bit Map : ABCD EF 10 11 2345 6789 

/ 

(Secteurs) valeur 0 0001 

v 

secteur 1 


• • • • 

EXEMPLE 3 


Il n‘y a pas 
d'autre directory 


Commence piste 0 
Secteur A ( » 10) 


Protection : 
Unlock 


J 


9100 \ / 

00 0000 0000 000 1 5547^5405070 .UDUI1I 

0C 2020202E424 1535302000008 ^__^80SS.". . . 
18 554 4 55405020^02020 45 TjOUIIP .81 
24 4E53020 0Q00A5jH2^?534543 NS....URWSEC 


30 544F52.2E,424 153,52 
3C/i 

s, ç/ffffff 

Nom du^ / 

ptogre- 54 F FFFFFFFF 
FFFFFFFFFF 
FFFFFFFFFFF 
FFFFFFFFFFF 



40ÇJFFFF 
FFFfKFFFI^FF^FFF 
FFFFFPFFFFF 
FFFFFF^fFFFFF 

fffffffPfffff 

FFFFFFFFI^FFFF 

ffffffffffVff 

FFFFFFFFFFFlFFFFFFFFFF 
90 FFFFFFFFFFFFFFFFFFFFFFF 
9C FFFFFFFFFFFFFFFFFFFFFFF 
88 FFFFFFFFFFljFFFFFFFFFFFFF 
B4 FFFFFFFFFFFFFFFFFFFFFFFF 

co ffffffffffhfffffffffffff 

CC FFFFFFFFFFI-FFFFFFFFFFFFF 
08 FFFFFFFFFFljFFFFFFFFFFFFF 
E4 FFFFFFFFFFljFFFFFFFFFFFFF 
F0 FFFFFFFFFFljFFFFFFFFFFFFF 
FC FFFFFFFF | 

Extension du programme 

• • • • 


Le directory suivant se trouve piste 
20 ■ #14. secteur 15 » # F 


T0R.8ASS. . , 





Type séquentiel 


’l Hoir ie 


9100 

00 000 0)1 4OF / 000 ) 554D55534943.III1USIC 

0C 4F52492E4241535342000310 ORI.B0SSB. .. 
18 554U5653494 34 845582E4 24 9 UI1U5 I CHEX. B 1 
24 4E53060004055550414ES448 NS. . ..UP0N1H 
30 455?452E42494E5304000409 ERE.B INS.... 
3C :>'.i 494E4449414E4120?E424I U1NOI0N0 .80 
48 535342000802554F524943411 SS8. . . UOR1 Eli 
54 55S3202E424 153533F000C02 US .B0SS'>. .. 
60 55434 1535345544 5542E424 I IIP0SSE1 E I. B0 
6C 53530E000L105542524I484E SS....UBR0IN 
28 2070202E4241535322000F04 .80SS’... 


84 

90 

9C 

08 

B4 

C0 

CC 

08 

E4 

F0 

FC 


5540415849547020202E424! 
53530E00100155454E564148 
4953202E424153530F001010 
55434156414C4945522E4241 
53530800110055434F55S747 
4520207E4241535308001204 
554152454C452020202E4 24| 
53530E0013015554454C4543 
52414E2E424153530800I309 
5546524F474 25920202E4 241 


UH0X 11 .80 

SS_UENU0H 

IS .B0SS_ 

UC0U0L1ER.80 
SS. ...UC0UR8 

E .80SS_ 

IJ01-1ELE .80 
SS....UTELEC 

R0N. B0SS_ 

LIFRflGGT .80 


53531500 


SS. . 


• • • • 

EXEMPLE 5 

Descripteur d'un programme 


Le programme 
occupe les 
secteurs 
désignés 
par piste 
secteur, 
donc de 0.2 
à 3.F 


Pas d'autre Le programme commence en #500 

secteur pour le occupe ,4022 octeis 

9 1 00 description/' 

00 ff ? 4 3 000 ^ @.... 

0C Q005Q0060002000800090000 . 

18 000B000C000O000E000F0010 . 

24 001101010 J02010301040105 .. 

30 010601020108010901000108 . 

3C 010C010O010E010F01 1001 II . 

48 020102020203020402050206 . 

54 020202080209020002Ü8020C . 

60 020D020E020F0210021I0301 . 

6C 030203030304030503060302 . 

78 03080 30903000308030C 03011. 

84 g30£ Q3Qi: FFF FF FFFFFFFFFFF . 

90 FFFFFFFFFFFFFFFFFFFFFFFF . 

9C FFFFFFFFFFFFFFFFFFFFfFFF . 

08 FFFFFFFFFFFFFFFFFFFFFFFF . 

84 FF FFFFFFFFFFFFFFFFFFFFFF . 

C0 FFFFFFFFFFFFFFFFFFFFFFFF . 


34 































































































CC 

FF 

FFFFFFF 

F F 

D8 

FF 

FFFFFFF 

FF 

E-1 

FF 

FFFFFFF 

FF 

F 0 

FF 

FF FF F F F 

F F 

FC 

FF 

FFFFFF 



Fl-J-F FF F Ff-T f-T F 
FF FFFFFFFFFFF 
FF h F FFF FF F F FF 
FFFFFFFFFFFFF 


Il s'agit du programme MUSICORI.BAS (voir 
exemple 4). Sur l’exemple 4, on s'aperçoit 
que le programme suivant (MUSICHEX.BIN) 
commence piste 3. secteur # 10, soit le sec¬ 
teur suivant la fin de celui exposé ici. 


• • • • 


9100 

m 


EXEMPLE 6 
Le DOS commence piste B, secteur B I! 


00000007 0000 95-1654 <1 <14 F 99.LIF1 DOS 

0C 332U322E535953533E000401 3-2.SYSS>... 

18 4C464F 52404 15-120202E -12-11 LFORilOT . BO 
2-1 53530f)00040B4r:464F5?4l)4 1 SS.... L F ORI’IB 
30 S420202E434D44530300040E T .COUS.... 

3C 4C534543544F5220202E4441 LSECIOR .00 
48 5-153030004 1 14C424B507020 1S....LBKP 
54 7070202E424 1535700000.09 .BOSS. ... 

60 4C424B5070702020702E434O LBKP .Cil 

6 C 44530200050B105-14B442020 DS....LTKU 
78 7020707E4241535905000310 .BOSS.... 

84 4C544B442020207Ü202E4340 L1 KD .CO 

90 44530700060610434F50593] OS....LCOPYI 
9C 7020707E4241535304000600 .BOSS.... 

08 4L434F5059202020702E4 34O LCOJPl .Cil 
B4 44530700060C55534F4031 70 DS....USOril 

C0 2020207E5343575306000905 .SCRS_ 

CC 5554455354444957707E474 I IJTESTOIP . BO 
PB 533307000900555415335437 SS....UIE51S 
El 4551552E174153530700090F EOU.BOSS.... 

F0 59404 I5443575170707E424 I 0I101ES1 . BO 

FC 93930-101) SS. . 

Piste 20, secteur 2 d’une disquette contenant 
le DOS. 







USTING 6 



ID030-D0CC 







D030 

BD 

00 

00 

LDfl 

«0000 

DOOO contient \ 

la valeur * 20 


D033 

8D 

75 

D0 

STfi 

40075 

El 20 : adresse de 

□ 036 

8D 

7B 

□0 

STfi 

SD07B 


début de la table 
des mots- clés. 

□ 033 

8D 

80 

D0 

STfi 

$U09U 



Ü03C 

fi □ 

01 

D0 

LDfi 

$1)00 1 

D 0001 contient 


D03F 

8Û 

76 

00 

STfi 

$□076 

la valeur «El 


D042 

8D 

78 

D0 

STB 

$0078 



□045 

80 

9E 

D0 

STfi 

$Ü09E 



U048 

20 

18 

00 

J SR 

$UÜ 1 8 

— compte le nombre de caractères de la 

U04B 

na 

00 


LDfi 

Il $00 V 

commande et le stocke en «DOOB 

D04D 

8Ü 

15 

Ü0 

STB 

30015 

initialise nombre de caractères 

D050 

20 

58 

00 

J SR 

3U05B 

— teste commande par rapport mots-clés 

D053 

B0 

03 


BCS 


si existe ? 


D055 

4C 

85 

CF 

J HP 

3CF85 

non, erreur 


D058 

4C 

84 

DI 

.1MP 

•$□184 

ou, saut pour exécution 


□058 

BO 

15 

ÜU 

LUfi 

tl)015 

j initialise D007 â 0 — routine test 

D05E 

80 

07 

D0 

STB 

«0007 



D061 

fi0 

00 


I.OY 

Il $00 \ 

initialisation nombre de mots-clés déjà tes- 

1)063 

8C 

06 

00 

srr 

$1)006 

tés donc 0 en D006 


1)060 

fi2 

00 


i. nx 

Il $00 

X : index pour les caractères des mots-clés 

□ 068 

fiC 

15 

□0 

LÛT 

$□015 

- nombre de caractères testés et égaux 

□ 068 

CC 

0B 

U0 

CPT 

$O00B 

■ nombre de caractères de la commande ? 

□ 06E 

90 

02 


B CC 

$D077 

SI < 


□ 070 

18 



eu 

'i., * 



D07 1 

60 



RTS 

J s, < 



□072 

81 

E3 


LDfi 

($E9) , 1 

prend le caractère de la commande 

007-1 

DO 

04 

El 

CMP 

$EJ 04 . X 

le compare avec le caractère du mot-clé 
en cours 

□077 

F0 

48 


BEO 

$D0C 1 

— si identique 


□079 

Bü 

04 

E 1 

LOB 

$E } 04 . X 

sinon, prend le caractère du mot-clé 

D07C 

C9 

00 


cnp 

Il $00 

compore avec 0 


D07E 

D0 

02 


BNE 

$□082 

si <0. donc code ASCII > « 7F indique 

□080 

18 



CLC 

\ sinon 

(in mot-clé 


D06I 

60 



RTS 

) 



□ 082 

29 

7F 


fiND 

U$7F 

ramène le code ASCII < «80 

□084 

01 

E9 


cnp 

($E-9J,Tet le compare avec le 

caractère de la 

□ 086 

F0 

40 


BEU 

$O0C8 

commande si identique 


□ 088 

BC 

07 

D0 

LÛT 

SD007 



□ 08B 

8C 

15 

D0 

srr 

$0015 

remet 0 dans D01 5 et dans X 

D08E 

B2 

00 


LUX 

!t$00 



D090 

EE 

06 

D0 

INC 

$D006 

— augmente le nombre de mots-clés testés 

D093 

EE 

90 

D0 

INC 

$0090 



□096 

Ü0 

04 


PNE 

$Ü09C 

lincrômente valeur dans la table pour les test! 

D098 

EE 

9E 

DO 

INC 

$O09E 




- URGENT... URGENT... URGENT 

NOTRE GROUPE 
RECHERCHE 

Pour participer à la rédaction de ses 
revues spécialisées 

Hou F 

Connaissance indispensable des 
ordinateurs de la gamme 

AMSTRAD 

et de leur environnement matériel et 
logiciel. 

Connaissance appréciée des 
ordinateurs de la gamme 

ORIC 


Il ou elle doit être disponible, 
dynamique et doit savoir rédiger 
avec humour. 

Possibilité promotion rapide. 

Appelez le 99. 52. 98.11 
demander Denis BONOMO 
ou Marcel LEJEUNE 


D09B : 

EB 



NOP 





D09C : 

BD 

04 

El 

LOB 

$E 104 


recherche la fin du mot-clé en cours 

003F : 

30 

03 


Bru 

tD0fi4 

/ 



D0B] : 

4C 

93 

00 

jnp 

$0093 

si ce n'est pas la fin, secteur en D093 

D0B4 : 

EE 

90 

D0 

INC 

$D09D 




D0B7 : 

D0 

03 


BNE 

$D0fiC 


smon, incrémente encore une fois l’adresse 

D0B9 : 

EE 

3E 

00 

INC 

$D09E 

/ 

pour adresser le mot-clé suivant 

D0fiC : 

BD 

90 

00 

LDfi 

$D09D 




D0BF : 

80 

75 

00 

STfi 

•$Ü075 




D0B2 : 

8D 

78 

D0 

STB 

$0070 


stocke l'adresse trouvée en D075 et D07A 

D0B5 : 

fiü 

9E 

D0 

LOB 

$D09E 


pour les tests futurs 

O0B8 : 

80 

76 

00 

STfi 

$D076 




D0BB : 

80 

7B 

00 

STB 

$D07B 




O0BE : 

4C 

68 

D0 

J HP 

$D068 


et recommonce le test 

D0C] : 

EE 

15 

D0 

INC 

$D015 




O0C4 : 

E8 



INX 












incrémente le nombre 








de caractères égaux 

U0C5: 

4C 

68 

D0 

JNP 

$0068 




D0C8 : 

EE 

15 

00 

INC 

$0015 


incrémente le nombre de caractères égaux 

D0CB : 

38 



5EC 



met 1 dans le carry 

U0CC : 

60 



RTS 



retour en 0053 où test carry ■ 1 vrai — saut 








en 0184 


10184- 

-D1B0 








□ 184 : 

fiD 

04 

00 

LOB 

$D004‘contient «80\ 

0187: 

80 

9E 

ni 

STfi 

S019E 


I de branchement 

0 1 8B : 

fiD 

05 

D0 

LOB 

$0005 contient «E4 / 


DI BD : 

8D 

9F 

01 

STfi 

$D19F 




0190: 

fin 

06 

00 

LDfi 

SD006 











□ 193 : 

81J 

08 

00 

STfi 

$0008 




0196: 

02 

00 


LDX 

11*00 

nitielisation nombre de mots-clés passés 

□ 198: 

EF 

08 

00 

CPX 

$U008 -ce le bon ? 


ü 1 9B : 

90 

03 


BCC 

SUlfi0 

non 


□ 1 90 : 

BC 

fafi 

E4 

JNP 

C $E4bfi) oui, saut à son adresse de branchement 

U 1 fi0 : 

fi0 

02 


LOT 

«402 




D1B2: 

EE 

9E 

DI 

INC 

$019E 


\ 

3 fois car 3 octets 

□ IBS: 

D0 

03 


BNE 

$U Ififi 

incrémente 

1 : JMP 

□ 1H7 : 

EE 

9F 

01 

1 NC 

$019F 

adresse de saut 

2 : poids foible 









3 : poids fort 

□ Ififi : 

88 



DE T 





□ IBB : 

D0 

FS 


BNE 

$01fi? 




□ 100 : 

ta 



I NX 

merémente nombre de mots-clés passés 

UlttE : 

4L 

98 

ni 

JNP 

$D 1 98 retour test suivant 


• • • 
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Un programme imaginé et réalisé par 

Bertrand BROCARD avec Marianne ALISON 


1938. 

Tandis que la situation 

■v v t 

t pqjitique s aggrave 
v én'Europe, au Havre 
le plus grand et le 
plus luxueux paquebot 
du monde appareille pour 
New-York. A son bord, 
une clientèle fortunée et 
insouciante... et pourtant un 
drame va se jouer pendant 
la traversée. Vous vous trouverez 
ainsi projeté au cœur de la plus 
incroyable histoire d'espionnage 
qui permit aux alliés de gagner 
la seconde guerre mondiale 
5 ans plus tard... 


Cobra Soft BP 155 71104 Chalon sur Saône Cedex 






«MEURTRES SUR L’ATLANTIQUE» pour ORIC ? 

«Attention, chef-d’œuvre... On ne peut faire plus complet et plus soigné...» (Soft & Micros) 

«Un bon logiciel qui vaut largement n’importe quel polar... A ne pas manquer !» (CPC) 

«Voulez-vous entrer dans la peau d'Hercule Poirot ou Sherlock Holmes ?» (Amstrad Magazine) 

«Le joueur va pouvoir s’éclater... Une présentation graphique en béton.» (Hebdogiciel) 

«Meurtres sur l’Atlantique est bien plus qu’un logiciel...» (Micro-Systèmes) 

«L’auteur de Meurtre à grande vitesse récidive... Richesse 9/10» (Sciences et Vie Micro) 

«Toujours plus fort... Génialement réalisé... Une intrigue ficelée de main de maitre...» (Tilt) 

«Un nouveau jeu génial... On croit réver... A ne pas manquer !» (jeux et Stratégie) 

«Un programme de style original particuliérement bien réussi !» (L’Ordinateur Individuel) 

«Un jeu fascinant...» (Microstrad) - «C’est fabuleux !» (Nouvel Observateur) 

Voilà comment la presse a salué de façon unanime le logiciel vedette de COBRA SOFT ! Pas besoin de commentaires... 
Compte-tenu des problèmes de distribution des logiciels pour Oric, et pour répondre à de nombreuses demandes, 
COBRA SOFT a décidé d’offrir aux lecteurs de THÊORIC l’occasion exceptionnelle de pouvoir disposer de Meurtres sur 
l’Atlantique en version cassette ORIC-1 et ATMOS en participant à une édition sous forme de souscription. 
Utilisez le bon ci-dessous. 

BON DE SOUSCRIPTION «MEURTRES SUR L'A TLANTIQUE» ORIC 

OUI, je désire participer à la souscription pour l’édition de la version ORIC de Meurtres sur l’Atlantique. Ci-joint ma 
participation de 250 francs, sous forme de chèque. 

J’ai bien noté qu’elle me donnera droit à une version originale et numérotée du logiciel Meurtres sur l’Atlantique 
en version ORIC-1 et ATMOS (cassette). Si au 31 décembre 1986 le nombre de participants à la souscription est in¬ 
férieur à 500, mon chèque me sera retourné. (Aucun chèque ne sera encaissé avant expédition). 

NOM et Prénom. 

Adresse complète et détaillée. 


Code postal.Ville. 

Bon de souscription à retourner à COBRA SOFT BP 155 - 71104 Chalon-sur-Saône Cedex - N’oubliez pas le chèque... 


nute... dernière minute... dernière minute... dernière minute... dernière minute... dernière 


NOUVEAUTES : A.T.M de COBRA SORT 

Voici un nouveau jeu d'arcade pour Oric-1 et Atmos : A.T.M. 

Il s'agit d'un jeu d’action comprenant 4 épreuves : vous devrez combattre en 
l’air, sur terre et dans la mer (d’où le nom...). 

Dans le premier tableau, vous serez aux commandes d’un avion supersonique avec 
lequel vous devrez traverser une nuée de mongolfières ennemies. 

Ensuite, au poste de pilotage d’un char, vous devrez franchir un terrain rocheux 
bombardé par des avions. 

Enfin, la dernière épreuve vous verra commandant d’un sous-marin dans une mer 
infestée de mines et batiments adverses. 

9 niveaux de difficulté, animations sonore et graphique. 100% langage machine. 

Ce jeu très rapide comblera les amateurs de bons jeux d'arcade î 

SI vous ne le trouvez pas chez votre revendeur habituel, commandez-1e par courrier 
en écrivant à : 

COBRA SOFT BP 155 - 71104 Chalon-sur-Saône Cedex 

Joignez votre réglement par chèque : 130 F (120 F + 10 F de port). 

Aucun envoi en contre-remboursement. 












Patrice GUERRIN 

Q uelle est la meilleure façon d'écrire un programme en 
langage machine et de l'envoyer à THEORIC ? C'est les 
datas. 

Et quelle est la pire corvée pour un Oricien ? Eh bien, c'est la 
saisie d'une interminable liste de datas. 

Vous venez d'acheter le dernier THEORIC et, ce mois-ci, on 
vous propose un super-éditeur de textes. Chouette, qu'est-ce 
que c'est bien ! 

Mais alors, lorsque vous tournez la page, horreur ! Trois, voire 
quatre pages remplies de chiffres ! Bien que les programmes 
proposés vaillent la peine d'être tapés, une horrible envie de 
déglutition sur votre beau THEORIC s'empare de vous (Non ! 
quand même pas, docteur I). Et si ! 


C'est pour cela que j'ai décidé de 
créer DATA + , car DATA + , 
c'est plus (encore un qui regarde 
trop la télé !). 

Mais, tout d'abord, regardons les 
qualités et les inconvénients 
d'une liste de datas, telle qu'elle 
nous est proposée généralement 
dans notre revue préférée, j'ai 
nommé THEORIC. 

(NDLR : Merci !). 

10000 DATA 10,10,10,10,10, 
10,10,10,10,80. 

Tout d'abord, on peut remarquer 
la présence d'une somme de 
contrôle, ce qui est très apprécia¬ 
ble. Il y a aussi, dans le chargeur 
de langage machine, un POKEI, 
VAU" # " + A$), ce qui évite de 
taper 9 lettres à chaque ligne 


comme celle-ci. 

ioooo DATA.no.no. no.... 

Eh bien pour les avantages, c'est 
tout ! 

Regardez le numéro de la ligne ci- 
dessus. Mais oui, c'est bien le 
numéro 10000. 10000 ! Mais 
pourquoi faire des lignes 10000 
à 5 chiffres alors que l'on pour¬ 
rait commencer à partir de la ligne 
10, ce qui permettrait d’économi¬ 
ser 2 à 3 caractères par ligne. 2 
à 3 caractères, pff ! un détail... 
Oui, mais un détail qui, lorsque 
l'on copie plusieurs centaines de 
lignes, commence à prendre de 
l'importance. Lorsque l'on rentre 
500 lignes, c'est déjà 1000 
caractères de moins à taper ! 
Dans certains programmes, on ne 


trouve que 8 octets par ligne, 
alors que l'on peut en mettre faci¬ 
lement 1 6 ! 

Alors, quand une ligne ne 
comprend que 8 octets par ligne, 
pour en copier 1 6, il faut taper 
deux fois un numéro de ligne, 
deux fois le mot data et deux fois 
la somme de contrôle (et il faut 
appuyer deux fois sur RETURN). 
Non, non, je ne suis pas d'origine 
écossaise ! 

N'empéche qu'en appliquant les 
conseils ci-dessus, le programme 
peut-être réduit d'un quart. Si 
celui ci comportait 4000 caractè¬ 
res, vous n'en copierez plus que 
3000. Appréciable, non ? 
CONCLUSION : Auteurs, mettez 
vos lignes de caractères entre les 
lignes 10 et 999 et mettez le plus 
de caractères par ligne, ça vous 
fera les pieds ! 

Voyons maintenant le rôle de cet 
utilitaire. 

DATA+ est un programme de 
numérotation automatique, de 
sortie automatique en mémoire et 
à l'écran du mot basic DATA, de 
sortie automatique de virgules 
tous les deux caractères et, en 
plus, il vous dit comment éviter 
de copier la somme de contrôle. 
En effet, prenons un exemple de 
chargeur : 

1 FOR I = U 2000 TO # 3000 
STEP 16 

2 FOR A = I TO 1 + 15: READ 
D$ 

3 X = VALC'ff" + D$):POKEA,X 

4 SOM = SOM + X:NEXT 

5 READSC:IFSC< >S0M 
THEN PRINT"ERREUR": 

END 

6 SOM = 0:L = L + 1 :NEXT 

Le rôle de ce chargeur est de lire 
les 16 octets d'une ligne, de les 
sortir en mémoire, de les addi¬ 
tionner et de les comparer à la 
somme de contrôle. 

Puisque nous ne voulons pas 
copier la somme de contrôle, on 
va faire disparaître la ligne 5 et la 
remplacer par : 

5 PRINT"LIGNE ”;L;" = "; 
SOM:GETA$ 

La somme de chaque ligne sera 
affichée à l'écran, et vous pour¬ 
rez alors la comparer avec celle 
qui se trouve dans les lignes de 
data. Si la somme ne correspond 
pas, faites un CTRL-C et vérifiez 
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la ligne indiquée. 

Pour comprendre le fonctionne¬ 
ment de DATA + , il est impéra 
tif de savoir comment les lignes 
basic sont stockées en mémoire. 
L'ORIC range les lignes de basic 
à partir de # 501 (en # 500, il y 
a toujours un 0). Tout d'abord, et 
sur deux octets, on trouve 
l'adresse hexa de la prochaine 
ligne en mémoire. 

Puis, toujours sur deux octets, le 
numéro de la ligne proprement 
dite. 

Suivent ensuite les instructions. 
Les mots-clés du basic sont 
codés, ce qui permet à la ROM de 
les exécuter plus vite. 

Et enfin, le terminateur de fin de 
ligne, c'est-à-dire 00. Une ligne 
est toujours terminée par 00. 
Les deux pointeurs du Basic 
sont : 

#9A : contient l'adresse du 
début du stockage des lignes 
basic. Normalement, on y trou¬ 
vera #501. 

#9C-#9D : contient l'adresse 
située juste après la fin du pro¬ 
gramme. A noter qu'un pro¬ 
gramme basic est toujours ter¬ 
miné par trois zéros. 

Prenons comme exemple les 
lignes : 

10 DATAI 
20 ZAP 

En désassemblant à partir de 
# 500, on trouve : 

#500 : 00,08,05,OA,00,91,31, 
00 

#508 : 0E,05,14,00,A5,00,00, 
00 

En #501, il y a l'adresse de la 
ligne suivante, c'est-à-dire # 508 
(poids faible d'abord, puis poids 
fort ensuite, car n'oubliez pas que 
l'ORIC inverse les chiffres en 
mémoire). 

En # 503, on trouve, sur deux 
octets, le numéro de la ligne 
(#000A = 10). 

En #504, il y a #91 qui est le 
code pour le mot DATA, puis 
#31 qui est le code ASCII de 1. 
On trouve enfin l'indicateur de fin 
de ligne, c'est-à dire 00. 

En #508, on trouve à nouveau 
l'adresse de la prochaine ligne 
( # 50E). Puis, le numéro de ligne 
(#0014-20) puis #A5 qui est 
le code de ZAP, et enfin trois 0 
qui indiquent que le programme 
est fini. 


Bref, grâce à DATA + , vous allez 
pouvoir recopier une ligne de 
datas deux, voire quatre fois plus 
vite que d'habitude. 

ADRESSES UTILISEES 

$00, $01 : adresse de début de 
la ligne en cours de mémoire. 
$02. $03 : numéro de la ligne. 
$04 : compteur de caractères. 
$05 : compteur d'incrémentation 
des lignes. 

$06 à $0B : utilisés pour des cal 
culs divers. 

A partir de #9600 : stockage 
provisoire des datas pour utilisa 
tion ultérieure. N’oubliez pas 
l'adresse $E853 qui permet 
d'évaluer une expression nurné 
tique qui sera pointée par YA (ou 
plutôt qui sera contenue dans 
YA). 

Exemple : !550 mettra 550 dans 
YA et en # 33 et #34 ( # E853 - 
#E79D sur ORIC-1). 

DATA + est un utilitaire 100 % 
langage machine et se situe à 
partir de #9400 jusqu'à #95F5. 

MODE D'UTILISATION 

Tapez tout d'abord le listing qui 
va vous permettre de rentrer le 
langage machine en mémoire 
(Attention, il y a une version 
ORIC-1 et une version ATMOS). 
Ce sera le dernier listing de datas 
qui sera dur à copier pour vous. 
Après, avec DATA + ... 

Une fois le listing tapé, sauve- 
gardez-le (CSAVE''DATA + "), ça 
peut servir. Tapez RUN, corrigez 
vos erreurs si vous en avez fait, 
puis rentrez : CSAVE"DATA + ”, 
A# 9400, E#95F5. Eteignez 
votre ordinateur et rechargez la 
partie que vous venez de sauver. 
Pour entrer dans DATA + , il faut 
taper CALL #9400 (a,b), 
a est le numéro de ligne à laquelle 
on désire commencer, 
b est l'incrémentation que l'on 
veut entre chaque ligne. 
Exemple : 

Tapez CALL #9400,(2000,10) 
Cela fera commencer le pro¬ 
gramme à la ligne 2000 et incré- 
mentera les lignes de 10 en 10. 
Une fois votre CALL fait, une 
ligne 2000 DATA doit apparaître. 
Entrez par exemple, les chiffres 
01, 02, 03, 04. 05... Vous 


remarquerez alors que tous les 
deux chiffres tapés, une virgule 
apparaît automatiquement. Vous 
pouvez entrer 20 octets au maxi¬ 
mum, après, un PING vous pré¬ 
vient que vous êtes en fin de 
ligne. 

Une fois votre ligne rentrée, tapez 
/ (l'inverse). Cette touche se situe 
en haut à droite, au dessus du 
DEL. 

Cette touche arrête le pro¬ 
gramme. Tapez alors 'LIST'. La 
ligne que vous avez tapée appa¬ 
raît alors. 

La dernière virgule a disparu. 
Voici les quatre fonctions dont 
vous disposez : 

RETURN : permet de valider une 
ligne. 

DEL ; pour retourner au début de 
la ligne courante. 

ESC : pour retourner à la ligne 
d'avant. 

\ : pour arrêter (fin). 

ATTENTION 

Si vous mettez le programme en 
route, que vos copiez de datas, 
que vous arrêtez le programme et 
que vous le remettez en route à 
nouveau, la première liste de 
datas sera détruite. 

Pour éviter cela, prenons un 
exemple. 

Vous êtes en train de copier la 
première partie d'un programme 
et vous voulez arrêter et conti¬ 
nuer demain. Tapez la touche 
FIN, puis PRINT HEX$ (DEEK 
(#90)-2 

Marquez précieusement le résul¬ 
tat sur un morceau de papier. 
Le lendemain, chargez DATA + , 
puis les datas que vous avez 
copiés la veille, puis tapez : 
POKE #9401, poids faible 
adresse 

POKE # 9406, poids fort adresse. 
Exemple : si le nombre sur votre 
papier était #545, faites : 

POKE #9401, #45 
POKE #9406, #05 
Et voilà, grâce à cette astuce, 
votre premier programme ne sera 
pas détruit et vous pourrez 
continuer tranquillement à copier 
votre précieux programme. 

Et maintenant, amusez-vous 
bien, et tâchez de profiter intelli¬ 
gemment du temps que vous a 
fait économiser DATA-t- ! 
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0 REM 

1 REM 

2 REM 

3 REM 
REM 
REM 
REM 
REM 

B REM 

9 REM- 

10 ' 

11 ' 

12 ' 

13 

14 
1 


DATA 


PATRICE GUERRIN 


19B6 



VERSION ORIC 1 


105 
1 10 


REM 

CLS:PRINT: PRINT"UN INSTANT. ... IMPLANTATION EN COURS." 

19 £=#9400:F=#95F5:L=100:REPEAT: FOR A=A TO A+15:READ C$ 

20 K=VAL("#"+Cï):S=S+K+o5536*(S+K>65535): IF A<=F THEN POKE A,1 
30 NEXT:READ D$ : IF S=VAL("#"+D$> THEN L=L+5:UNTIL A>F: END 

40 PING:PRINT"Èrreur ligne";L 

100 DATA A9,01,8D,00,00,A9,05,BD,01.00,A9,OO,8D,04,00,20,03CD 
DATA D9. CF, 20, D<b, CF , 20,9D, E7, BC, 02, 00, BD, 03,00,20, D9,0AF5 
DATA CF,20,9D,E7,BC,05,00,20,D3,CF,20,9F,CB,AE.02,00,11F5 
115 DATA AD. 03,00, 20, C1 , EO, 20, OD, CC, A9, 44,20, 12, CC. A9, 41, 1834 
120 DATA 20, 12, CC, A9,54,20, 12,CC,A9,41,20, 12, CC, AO, 00, 20, 1DD5 
125 DATA F8, C5,20,12,CC,C9,OD,FO,68,C9,7F,FO,CD,C9, 1B,FO,2797 
130 DATA 5A,C9,5C,FO,3A,99,00,96,C8,EE,04,00,20,F8,C5,20,2F2o 
12, CC, C9, OD, FO, 4B, C9,7F, FO, BO, C9, IB, FO, 3D, C9, 5C, 3833 
FO,1D,99,00,96,EE,04,00,C8,A9,2C,20,12,CC,99,00,3E95 
96, C8, EE, 04,00, AD, 04,00, C9,3C, FO, 06, 4C, 4F, 94,4C. 450C 
150 DATA 96,95,20,85,FA,20,F8,C5,C9,OD,FO,15,C9,7F,FO,OE,4DD4 
155 DATA C9, IB, FO, 07, C9,5C, FO, E7,4C, A2, 94,4C, BD, 95,4C, 2A, 5641 
160 DATA 94,AO,04,AE,04,00,CA,BD,00,96,C9,2C,DO,03,CE,04,5CE2 
165 DATA 00,A9,91,91,00,EA,AD,04,00,8D,OB,00,EA,A2,00,AO,630C 
170 DATA 00,18,AD,00,00,69,05,8D,09,00,AD,01,00,69,00,8D,6679 
175 DATA OA,00,BD,00,96,91,09,ES,18,AD,09,00,69,01,8D,09,6B26 
DATA 00, AD, OA, 00,69,00, 8D, OA. 00, CE, OB. 00, AD, OB, 00, C9,6F37 
DA TA 3C,FO,03,4C,F2,94,AO, 05, 18, AD,00,00,6D,04,00,8D,7 4A0 
DATA 06,00,AD,01,00,69,00,8D,07,00,A9,00,91,06,AO,00,7831 
DATA 18,AD,00,00,6D,04,00,8D,06,00,AD,01,00,69,00,8D,7 B9E 
DAT A 07,00,18,AD,06,00,69,06,BD,06,00,AD,07,00,69,00,7E8F 
DATA BD,07,00,EA,AD,06,00,91,00,C8,AD,07,00,91,00,C8,8426 
DATA AD,02,00,91,00,CB,AD,03,00,91,00,EA,EA,EA,AD,06,8AEO 
215 DATA 00,8D, 00,00,AD,07,00,8D,01,00,EA,18,AD,05,00,6D,8ED0 
220 DATA 02,00,BD,02,00,AD,03,00,69,00,8D,03,00,A9,00,BD,9240 
225 DATA 04,00,EA,4C,2A,94,AD,06,00,BD,00,00,AD,07,00,BD,96B9 
230 DATA 01,00,A9,00,AO,00,91,00,C8,91,00,18,AD,00,00,69,9B1B 
235 DATA 02,8D,9C,00,AD;01,00,69,.00,SD,9D,00,60,38,AD,02,9FCE 
240 DATA 00,ED,05,00,8D,02,00,AD,03,00,E9,00,8D,03,00,A9,A421 
245 DATA 00,8D,04,00,4C,2A,94,50,4F,55,52,20,54,4F,49,4F,A85D 
250 DATA 4E, 20,54,45,4C,38,34,2E,32,38,2E,31,28,44,45,4D,AC11 
255 DATA 41,4E,44,55,55,55,00,00,00,00,00,00,00,00,00,00,ADE3 


O 5 

140 DATA 
145 DATA 


180 
185 
190 
195 
200 
205 
210 







DATA 


AUTEUR: PATRICE GUERRIN 


- 1986 - 


VERSION ATMOS 



O REM- 

1 REM 

2 REM 

3 REM 

4 REM 

5 REM 

6 REM 

7 REM 

8 REM- 

9 REM 

10 ' 

11 * 

12 REM- 

19 a=#9400:F=#95F5:L=100:REPEAT: FOR A=A TO A+15:READ C$ 

20 K=VAL("#"+C$>:S=S+K+65536*<S+K>65535): IF A<=F THEN POKE A,K 
30 NEXT : READ D$:IF S=VAL ( '‘#"+0$ > THEN L=L+5:UNTIL A>F : END 

40 PING:PRINT"Erreur ligne";L 

)0,00,A9,05,8D,01,00,A9,00,8D,04,00,20, 03CD 
i2,DO,20,53,ES,8C,02,00, 8D,03,00,20,65,0952 
L8,8C,05,00,20,5F,DO,20,FO,CB,AE,02,00,0FE8 
:0,C5,E0,20,D4,CC,A9,44,20,D9, ÇC, A9,41,17B9 
54,20,D9,CC,A9,4 1 .20,D9,CC,AO, 00,20,1F AF 
CC,C9,OD,FO,68,C9,7F,FO,CD,C9, 1B, FO, 2A28 
3A, 99,00,96, C8, EE, 04,00,20, E8, C5,20,3 1 A7 
FO,4B,C9,7F,FO,B0,C9,IB,FO,3D,C9,5C,3B7B 
96,EE,04,00,C8,A9,2C,20,D9,CC,99,00,42A4 
00,AD,04,00,C9,3C,FO,06,4C,4F,94,4C,491B 
F A,20,E8,Ü5,C9,OD,FO,15,C9,7F,FO,OE, 51ED 
C9,5C, FO, E7,4C, A2, 94,4C, BD, 95,4C, 2A, 5A5A 
04,00,CA,BD,00,96,C9,2C,DO,03,CE,04,60FB 
00,EA,AD,04,00,8D,OB,00,EA,A2,00,AO ,6725 
00,69,05,8D,09,00,AD,01,00,69,00,8D,6A92 
96,9 1 ,09,E8, 1 8,AD,09,00,69,0 1 ,8D, 09, 6F3F 
69,00,8D,0A,00,CE,OB,00,AD,OB,00,C9,7350 
F 2,94,AO,05, 18,AD,00,00, oD ,04,00,8D,78B9 
00,69,00,8D,07,00,A9,00,91,06,AO,00,7 C4A 
SD,04,00,8D,06,00,AD,01,00,69,00,8D,7FB7 


100 

DATA 

A9,01,8D,00, 

00,A9, 

05 

105 

DATA 

s5,DO,20,62, 

DO,20, 

53 

110 

DATA 

DO,20,53,E8, 

8C,05, 

00 

115 

DATA 

AD,03,00,20, 

C5,EO, 

20 

120 

DATA 

20,D9,CC,A9, 

54,20, 

D9 

125 

DATA 

ES,C5,20,D9, 

CC,C9, 

OD 

130 

DATA 

5A,C9,5C,FO, 

3A,99, 

00 

135 

DATA 

D9,CC,C9,oD, 

FO,4B, 

C9 

140 

DATA 

FO,1D,99,00, 

96,EE, 

04 

145 

DATA 

96.C8,EE,04, 

00,AD, 

04 

150 

DATA 

96,95,20,9F, 

FA.20, 

E8 

155 

DATA 

C9,IB,FO,07, 

C9,5C, 

FO 

160 

DATA 

94,AO,04,AE, 

04,00, 

CA 

165 

DATA 

00,A9,91,91, 

00,EA, 

AD 

170 

DATA 

00,18,AD,00, 

00,69, 

05 

175 

DATA 

OA,00,BD,00, 

96,91, 

09 

180 

DATA 

GO,AD,OA,00, 

69,00, 

8D 

185 

DATA 

3C,FO,03,4C, 

F 2,94, 

AO 

190 

DATA 

06,00,AD,01, 

00,69, 

00 

195 

DATA 

13,AD,00,00, 

6D,04, 

00 

200 

DATA 

07,00,18,AD, 

06,00, 

69 

£05 

DATA 

8D,0 7,00,EA, 

AD,06, 

00 

210 

DATA 

AD,02,00,91, 

00,C8, 

AD 

215 

DATA 

00,80,00,00, 

AD,07, 

00 

220 

DATA 

02,00,8D,02, 

00,AD, 

03 


DATA 

04,00,EA,4C, 

2A,94, 

AD 

230 

DATA 

01,00,A9,00. 

AO,00, 

91 

•"J 

DATA 

02,8D,9C,00, 

AD, 0.1 , 

00 

240 

DAT A 

00,ED,05,00, 

SD,02, 

00 

245 

DATA 

00,8D,04,00, 

4C,2A, 

94 

250 

DATA 

4E,20,54,45, 

4C,38, 

34 

255 

DATA 

4.1,4E, 44,55, 

55,55, 

00 






DÉSASSEMBLAGE DU PROGRAMME DATA + 


DK» 


l.DA 


ORC $«4Q0 DEBUT DU PROCRAMMK KN §9400 

I.PA #§01 INITIAL!SUR 

STA §00 LE DF BUT DU PROGHAMM! \§S01, 

LDA #§U!> FTT SORTIR 

STA §01 EN §00 ET §01 

JHR §D0b5 DEMANDER UNE VIRGULE 

J SE §1)002 D [•-''LA N DE R UNE PARENTHESE 

JSR §KH!>3 EVALUER LE NUMERO DE L1 UNE 

STY §0? SORTIR PO]DS FAlHI.r DI. LA LIONE EN §0? 

STA §03 ET LE POIDS PORT KN §0J 
JSK §1)065 DEMANDER UNE VI RCV! K 
JSR §EL t >3 EVALUER !.’1NUKF-ME.N TA ! «ON 
STY §05 ET LA SORTIR IvN §06 
.1SR §l)05F DEMANDER UNE PARENTHESE 
JSR §C»F0 SAUT UE LI ONE: 

LDX §02 

LDA §03 INITIA!.ISKR LE POIDS FAIBLE ET LP POIDS FORT DI ND.M DE LA LIGNE 
JSR §E0Ch ET SORTIR LE NUM A L’ECRAN 
JSR §0001 AFFICHER UN ESPACE 
LDA ' D’ " 

JSR §0Cl>9 “ 

LDA 'A* - 

JSR §CCt)9 

‘T’ AFFICHER DATA A L’ECRAN 
JSR §CVD9 
LDA 1 A ’ 

JSR §COD9 


LDY «§00 METTRE Y A 0 
SA!S JSR §C‘)E8 CETAf» 

JSR §CC!)9 AFFICHER LA TOUCHE FRAPPEE 
CMP #§0D EST CE RF.TURN ? 

UEO MHM OUI. ALORS ALLER A J1KM 
CMP #§7F EST CE DEL *» 

BEU DEB OUI. ALORS RETOURNER AU DEBUT DU PRC 
CMP «§1B EST CE ESC ’ 

UFC XYZ OUI. ALORS ALLER A XYZ 
CMP #§50 EST CE LA TOUCHE FIN ? 

UEO H OUI Al.ORS ALLER A H 

STA §9600.Y SORT IF PU CARACTERE KN MEMOIRE 

I NY Y * Y•I 

INC §04 INCREMENTKR LE COMPTEUR DE CARACTERES 
JSR §ChKB CETA§ 

JSR §CC09 ET AF ICHER LA TOUCHE 
CMP »^0D RETURN? 

BEC MEM 

CMP .#§7 F DEL.» 

BEU DEB 

CMP #§ 1B ESC'» 

BF.y XYZ 
CMP #5C FIN? 

BP.O H 

STA §9600. Y SORTIE DU CARACTERE EN MFLM01RE 
INC §04 INCREMENTKR §04 
INY INC Y 

LDA #§2C PRENDRE LF' CARACTERE D'UNE VIRGULE 

JSR §CCl)9 ET L'AFFICHER 

STA §9600. Y ET LF. SORTI P EN MEMOIRE 

INY 


INC §04 

LDA §04 PRENDRE LE CONTENU DE §04 
CMP #§JC KF*T T'ON EN FIN DK LIGNE" 


BKO ATT OUI. ALORS ALLER A ATT 
JMP SAIS RFITOURNEH AU PROGRAMME SAISIE 
H JMP FIN 

ATT JMT §FA9F FIN DE LIGNE: PING 

jsr §cbeb gf:ta§ 

CMP a§0D RETURN" 

BFO MEM 

CMP #§’/F DEL? 

BLO YTR 

CMP #§ IB ESC 0 

UEO XYZ 

CMP #§'5C FIN? 

UEO H 


JMP ATT RETOURNER A AIT 
XVZ JMP DLIC 
YTR JMP DEB 
NOP 

MEM LDY #§04 METTRE 4 DANS Y 

LDX §04 TRANSFERER LE COMPTEUR DE CARACTERES DANS X 
DKX DECREMENTER X 

LDA §9600.X PRENDRE LE DERNIER CARACTERE TAPE AU CLAVIER 
CMP #§20 ETAIT CL UNE . 

BNF MEMB NON ALORS ALLER A MEMB 

DFC §04 SINON ON DECREMENTE §04. CE OUI ENLEVE LA DERNIERE 
MEMB LDA #§91 PRENDRE LE CODE DE DATA 
STA<§00).Y ET LE SORTIR EN MEMOIRE 
NOP 

LDA §04 PRENDRF l.F. CP DE CARACT 
STA §0B ET LE RECOPIER EN §0P 
NOP 

LDX #§00 X-0 
LDY #§00 Y*0 

CLP MISE A 0 DE LA RETENUE 
LPA §00 

ADC #505 I NCKEMENTF.R A DE 5. 

STA §0« SORTIE EN §09 
LDA §01 

APC »§00 AJOUTE 1 SI C*I 
SIA §0A 

N(*P SORTIE DES CARACTERES EN MEMOIRE. 

SC AK LDA §*>»,D0.Y PRENDRE UN CARACTERE DANS LA TABLE 
STA ( §0«'.Y ET l’t SORTIR FN M KMV-IKK 


INCRhMKNTKR X POUR LE PROCHAIN PASSAGE 


INCRKMENTER LE POINTEUR DE SORTIE EN MEMOIRE 
DEC §0B DECREMENTER LE COMPTEUR DE CARACTERE 
§011 LE PRENDRE DANS A 
*§JC TOUT LES CARACTERES SORTIES" 

UI. ALORS ON VA A SFIL 
ON. ON RETOURNE A SCAR 
DK LA FIN DE LIGNE (00) 


§04 ADDITIONNER LE NB DF. CARACTERES 


I NX 

I NCI 

CLC 

C-0 

t.DA 

§09 

ADC 

«§01 

STA 

§09 

LDA 

§0A 

ADC 

#§00 

STA 

§0A 

DEC 

§0B I 

I.DA 

§011 l 

CMP 

B § JC 

BEI» 

Si IL 

JM!* 

SCAR 

NOP 

SORTI 

SFIL LDY 

#05 

CLC 


LDA 

§00 

ADC 

§04 ' 

SIA 

§06 

LDA 

§01 


AUC #§00 

STA §07 CALCULE OU PLACER LE 00 DE FIN DE LIGNE EN MEMOIRE 
LDA #§00 PRENDRE 00 

STA (§06,. Y ET LF SORTIE EN .MEMOIRE 
SL IG LDY #§00 REMISE A (X) DE Y 

CLC AINSI QUE DE LA RETENUE 

LDA §00 

ADC §04 

STA §06 

LDA §01 

ADC #§00 

STA §07 

LDA §06 CALCULE L - ADRESSE EN MEMOIRE DE LA PROCHAINE LICNE 

ADC #§06 

STA §06 

LDA §07 

ADC #§00 

STA §07 

NOP 

LDA §06 PRENDRE LE POtDS FAIBLE DE L’ADRESSE EN MEMOIRE DE LA PROCHAINE 
STA (§00).Y LIGNE ET LA SORTIR EN MEMOIRE 
INY INY 
LDA §07 

STA (§00). Y ET F'AIRE DE MEME AVEC LE POIDS FORT. 

INY 

LDA §02 PRENDRE LE NUM DE LICNE 
STA (§00).Y ET LE SORTIR EN MEMOIRE 
INY 

LDA §03 

STA (§00).Y SANS OUBLIER LE POIDS FORT DU NUM DE LIGNE 
NOP 

LDA §06 
STA §00 

LDA §07 INCREMENTATION DU L’ADRESSE POINTANT SUR LA MEMOIRE 
STA §01 
NOP CLC 

LDA §05 PRENDRE LA VALEUR DE 1’INCREMENTATION D’UNE LIGNE 
ADC §02 ET L’ADDITIONNER A LA LIGNE COURANTE 
STA §02 ET LA SORTIR 
LDA §03 

ADC #§00 SI C-l ALORS ON INCREMENTE 03 
STA §03 

LDA #§00 REINITIALISER LE COMPTEUR 

STA §04 DE CARACTERES EN §04 

NOP 

JMP DEB RETOURNER AU DEBUT 
FIN LDA §06 
STA §00 
LDA §07 
STA §01 
LDA #§00 

LDY #§00 ( TAY AURAIT GAGNE 1 OCTET) 

STA (§00).Y 
INY 

STA (§00).Y MET DEUX ZERO APRES LE ZERO DE FIN DE LIGNE. CE QUI SICNIFI3 

NOP QUE LF. PROGRAMME EST FINI 

CLC MISE A 0 DE LA RETENUE 

LDA §00 

ADC#§2 

STA §9C CALCULE L’ADRESSE JUSTE APRES LES TROIS ZEROS DE FIN DE PHOGRAFTi 
LDA §01 
ADC #§00 
STA §911 

RIS RE TOURNE AU BASIC 

NOP RETOURNER A l.’ ANCIENNE LIGNE 

SEC MISE A I DE LA RKIENUE 

LDA §02 PRENDRE LE POIDS FA MUE UE LA LIGNE COURANTE 
SUC §05 Y SOUSTRAIRE I.' INCREMENTATION 
LDA §03 

SUC #§00 SOUSTRAIRE 1 A §03 SI DEPASSEMENT 
STA §03 

LDA #§00 RESTAURER LE 

SIA §04 COMPTEUR DE CARACTERES 

JMP DEB ET RETOURNER AU DEBUT 


FIN DU DESASSEMBLAGE DK DATA • 
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OMC A 2 ROM 


S 


Michel SALMON 


I vous désirez disposer de 2 ROM dans votre ORIC/ 
voici une autre façon de procéder. 


Tout d'abord, un point important. 
Il vous faudra connaître 
quelqu'un qui soit en mesure de 
vous programmer une mémoire 
REPROM de type 27256. 

Avec ce type de mémoire, il est 
possible de placer le contenu de 
chaque ROM l'un derrière l'autre 
et, surtout, cette mémoire est 
totalement disponible avec la 
27128 de l'ORIC au point de vue 
brochage. 

La différence principale entre les 
deux boîtiers, hormis la taille 
mémoire, se situe au niveau de la 
broche 27 (voir figure). 


Sur la 27128, la broche 27 sert 
principalement au moment de la 
programmation et pour le cas qui 
nous intéresse, dans l'ORIC, elle 
sert à dévalider le boîtier si on lui 
applique un "0" (ROMDIS). 

Sur la 27256, la broche 27 cor¬ 
respond à un poids d'adresse 
supplémentaire permettant ainsi 
de doubler la capacité mémoire, 
ce qui signifie que lorsque ce 


point est à ''0”, on adresse la 
première moitié et donc, lorsque 
ce poids est à ”1 ", on adresse la 
seconde moitié. 

La modification sur l'ORIC est 
très simple, elle est même possi¬ 
ble sans fer à souder, elle 
consiste naturellement à faire 
l'échange de mémoire, et à pla¬ 
cer un dispositif permettant le 
passage d'une ROM à l'autre. 
Ce dispositif peut être un connec¬ 
teur femelle, sur lequel vous avez 
réuni le point 2 (ROMDIS) au 
point 34 (GND), et que vous enfi¬ 
chez sur le connecteur d'exten¬ 


sion, sa présence ou son absence 
vous donne l'une ou l'autre ROM. 


Avantage : pas de fer à souder. 
Inconvénient : occupation du 
connecteur extension. 

Ce dispositif peut être aussi un 
interrupteur, que vous placez 
sous le connecteur extension ou 
imprimante, qui vous permettra 
de relier (côté intérieur) la broche 
2 du connecteur extension à un 
point de masse (disponible côté 
connecteur imprimante). 

Utilisez un fer à souder à pointe 
très fine, car les broches concer¬ 
nées sont celles du dessous et la 
place est mesurée. 

Avantage : pas d'occupation du 
connecteur extension. 
Cependant, il subsiste un incon¬ 
vénient majeur, tout au moins 
pour ceux qui utilisent des exten¬ 
sions mettant en jeu le ROMDIS 
tel que lecteur de disquettes. 
Pour retrouver la fonctionnalité 
de ROMDIS, il faut ajouter un boî¬ 
tier 74LS02 et une résistance de 
2,2 kfl. 

Cette modification complémen¬ 
taire consiste à : 

— supprimer le strap LK ; 

— mettre la 27256 en laissant la 
broche 27 à l'extérieur ; 

— rajouter le 74LS02 (collé à 
l'envers sur le circuit) et le câbler 
selon le schéma suivant ; 

— câbler l'interrupteur entre la 
broche 27 du boîtier 27256 et la 
masse sans oublier de souder la 
rsistance entre cette même bro¬ 
che 27 et le +5 V. 

NOTE : IC11 est le circuit norma¬ 
lement absent lorsque la ROM 
d'origine est une 27128 (voir 
schéma de l'ORIC dans THEORIC 
n° 12). 

L'ensemble de ces modifications 
permet un retour facile à l'état ini¬ 
tial si besoin est. 

Au moment de la programmation, 
vous pouvez profiter pour chan¬ 
ger la couleur d'encre ou de 
papier, rectifier le bug de lecture 
(voir THEORIC n° 3), franciser les 
messages, etc# 


broche 14 =+5 V 



Vpp 

A12 

A07 

A06 

A05 

A04 

A03 

A02 

A01 

A00 

D00 

D01 

D02 

GND 


1 

2 

3 

4 

5 

6 

7 

8 

9 

10 
11 
12 

13 

14 


TT 


27128 


28 a 
27* 
26 ■ 
25 a 
24 a 
23 a 
22 ■ 
21 ■ 
20 ■ 
19» 
18 ■ 
17a 
16a 
15 a 


Vcc^ 

PGM 

A13 

A08 

A09 

Ail 

OE 

A10 

CS 

D07 

D06 

D05 

D04 

D03 



Vcc 

Al 4 

Al 3 

A08 

A09 

Ail 

OÉ 

A10 

CS 

D07 

D06 

D05 

D04 

D03 


Vue de dessus 
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Claude GUILLOT 


USIC", développé sur ORIC-1, est un utilitaire de 
création musicale écrit en Basic et en Langage 
Machine (l'adaptation à l'ATMOS est incluse dans 
le programme). 

Basé sur le détournement des interruptions, il permet 
l'exécution d'un morceau pendant le déroulement d'un 
programme sans l'interrompre. 



Après chargement — 3 minutes 
environ — tapez RUN : le langage 
machine s'implante puis s'affi¬ 
che. 

A la création (1 au menu), un 
tableau apparaît. 


: j. j j. i i i i 

1 2 3 4 5 6 7 8 
NOTE OCTAVE DUREE 

■ 


Valider à chaque fois par 
RETURN. 

C'est le moment de ''construire'' 
votre morceau ! 

Les notes admises sont : 

DO DO # REB RE RE # MIB Ml FA 
FA # SOLB SOL SOL# LAB LA 
LA# SIB SI 
Les octaves sont : 

1 = grave, 2 = médium, 3 = aigu 
(à vous de choisir l’étendue en 
fonction du morceau !). 


Les durées sont données de 1 à 
8 (voir tableau). 

Pour les pauses, les silences,... 
taper P à la place de la note. 

En fin de création (taper FIN pour 
quitter ce mode), vous donnerez 
le volume de 2 à 1 5, le tempo de 
1 à 15 (1 = rapide, 15 = lent) et 
enfin le timbre (l'instrument) : 
accordéon, biniou, clarinette, 
hautbois. 

Pour écouter le morceau ainsi 
créé, tapez 3 au menu. A la ques¬ 
tion "avez-vous fait des modifi¬ 
cations autres que le volume ?", 
répondre par O ou N. La modifi¬ 
cation du volume seul ne néces¬ 
site pas de calculs. A la première 
création, la réponse est indiffé¬ 
rente. 

Pour écouter plusieurs fois le 
même morceau, demander 
l'écoute par 3 au menu puis 
répondre N. 

Vous pouvez, par 2, entrer en 
partie modification relecture. Un 
menu en 7 points vous guide 
(7 = retour au premier menu). 

Si vous choisissez de lister tout 


ou partie du programme musical, 
vous pouvez quitter en cours de 
listage par appui sur ESC ( + une 
touche). 

L'insertion se déroule de la même 
façon que la création. Indiquez 
avant le numéro de la ligne d'in¬ 
sertion. Quittez par FIN. 

La sauvegarde (4 au menu) pré¬ 
serve la partie machine et la musi¬ 
que créée. Les adresses de début 
et de fin sont données. Vous pou¬ 
vez sauver le morceau du géné¬ 
rique en passant en sauvegarde 
avant toute création. Les sauve¬ 
gardes sont faites en AUTOrun. 
Pour une utilisation dans un pro¬ 
gramme (fond musical), il faut 
charger *MUSIC* (c'est-à-dire ce 
qui a été sauvé par 4 au menu) 
puis le programme l'utilisant par 
IMUSIC ou (STOP (un NEW est 
effectué en LM, d'où cette pro¬ 
cédure). 

Il ne vous reste plus qu'à créer 
des illustrations musicales qui 
pourront agrémenter vos réalisa¬ 
tions, leur apportant ainsi une 
touche "professionnelle". 
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10 REM**************************** 

20 REM* MUS IC C. SU ILLOT * 

30 REM* UTILITAIRE DE CREATION * 

40 REM**************************** 

45 : 

50 UIMEMttSCCF:P0KE#2ôA,10:IFPEEK(#D000)=looTHENCALL#F735ELSECALL#F7oo 
60 DI MNP* ( 1 8> , ND* (510) , 07. (510 ) , D7. (510). DU7. ( 1 00) , N1 * (100> , 017. ( 100 > 

70 CLS:PAPERO:INK3:PLOT10,10,CHR*(1)+"M"+CHR*(21+"U"+CHR*(1)+"S" 

80 PLOT 16,10,CHR*(2)+"1"+CHR*( 1 )+"C" 

90 PL0T4,12,CHR*(4)+"UTILITAIRE DE CREATION" 

100 PLOT 8. 1 5, CHR* ( 3 * + " ( C ) C. GU 1 LLOT " : PLOT 6,22, CHR * ( 21 + " VE'U ILLE Z PAT TENTER" 

110 PLOr6,24,CHR*(21+"45 SECONDES .. .": D0KE#3o6,#FFFF: GÜSU63100 
120 G0SUB2560:60SUB3500:G0SUB5000:D0KE#306,#2710:G0SUB2610 

125 : 

126 REM- MENU GENERAL - 

127 : 

130 CLS:PAPERO:INR3:PRINT: PRIN TER* DF *"MENU":PRINTER*DF *"MENU": PR1N T: F R 1N T 
140 PRINTEM*"1 -"EV*"CREAT ION":PRINT 

150 PRINTEM*"2 -"EV*"MODIFICATION / RELECTURE": PRINT 
160 PRINTEM*"3 -"EV*"ECOUTE": PRINT 
170 PRINTEM*"4 -"EV*"SAUVEGARDE": PRINT 
180 PRINTEM*"5 -"ER*"FlN DE TRAVAIL" 

190 PR INT : FRI NT : PR INT : F'RINT : F'RINTEM*SC*" VOTRE CHOIX ..." 

200 GETCH*: 1FVAL(CH*)<10RVAL(CH*> >5THENFING:G0T0200 
210 QNVAL (CH* 1 GOT0220, 410, 1730, 1850, 1*780 

215 : 

216 REM- CREATION - 

217 : 

220 CLS:VL=6:IFXL>1THENG0SUB4060 
230 IFR*="N"THEN130ELSEXL=1:CLS:G0SUB3430 
240 PL0T2,6,7:PL0T7,6,20:PL0T31,6,16 
250 PLOTS,6,"NOTE OCTAVE DUREE" 

260 YL=VL+1 

270 IFYL>23THENG0SUB3750:PL0T3,YL+1,EF*:YL=7:PL0T3,YL,EF* 

280 PL0T3,YL+1,EF* 

290 PL0T3,YL+2,TR* 

300 PL0T1,YL,2:PL0T2,YL,STR*(XL):X=8:G0SUB3300:G0SUB3410 

310 IFXL>495THENPL0T1,24,CHR*(1)+CHR*(12)+"STOP.LIMITE ATTEINTE !" 

320 IFERTHENPING:G0T0300 

330 ND* (XL) =N*: IFND* < XL) = "FIN"THEN07. ( XL) =0: D7. (XL) =0: 60SUB3790: GOTO 130 
340 IFND* ( XL) = "F"'THEN07. (XL) =4: G0T0370 

350 X = 16:G0SUB3300:IFVAL(N*)<10RVAL(N*)>3THENPING:G0T0350 
360 07. (XL)=VAL(N*> 

370 X=25:G0SUB3300:IFVAL(N*)<1ORVAL(N*)>80RLEN(N*)>1THENPING:G0T0370 
380 D7. (XL) =VAL. (N*> 

390 0ND7. (XL) G0SUB2400, 2410,2420,2430,2440,2450,2460,2470 
400 XL=XL+1 :G0T0260 

405 : 

406 REM- MENU DES MQDIF./RELECT - 

407 : 

410 CLS: F'RINT: PR I NTER* " MODIFI CAT I ON / RELECTURE" : F'0KE#26A, 10: F'RINT: F'RINT: PRINT 
420 PRINTEM*"VOULEZ-VOUS..."sPRINT:PRINT 

430 PRINTEM*"1 -”EV*"LISTER TOUT VOTRE PROGRAMME":PRINT 
440 PRINTEM*"2 -"EV*"L.ISTER UNE PARTIE" : PRINT 
450 PRINTEM*"3 -"EV*"MODIF IER UNE LIGNE":PRINT 
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460 PRINTEM®"4 — " EV$ " SIJF'F'R I MER DES LIGNES PR INT 
470 PRINTEM$"5 —"EV$"CHANGER VOL,TEMPO,TIMBRE": PRINT 
480 F‘RINTEM$"6 -"EV$"INSERRER DES LIGNES":PRINT 
490 PRINTEM$"7 -"ER$”RETOURNER AU MENU GENERAL" 

500 PRINT:PRINT: F'RINTEM$SC$" VOTRE CHOIX..." 

510 GETAî:IFVAL(A$)<10RVAL(A$)>7THENPIN6:G0T0510 
520 IFVAL<A$)=7THENM0D=0 ELSE M0D=1 
530 ONVAL( A® )G0T0540,550,760,1000,1290,1430,130 

535 : 

536 REM- LIS!ER LE PROG - 

537 : 

540 DEB=1:F=XL:G0T0620 
550 CLS:PRINTEM*"PROGRAMME NUMEROTE": PRINTEM*"DE"ER®"1"EM®"A"ER$XL:PRINT:PRINT 
560 PLQT2, 20, CHR® (2) +"RETOUR AU MENU EN TAPANT"+CHR* U ) + "0" 

570 INPUT"DEBUT ";DEB:IFDEB=0THEN410 
580 IFDEB< 1 ORDEB>XLTHENF'ING: G0SUB3770: G0T0410 
590 PRINT:PRINTSPRINT:PRINT:INFUT"FIN "; F 
600 IFF=0THEN41O 

610 IFF<1ORF> XLORF<DEBTHENPING:G0SUB3770:G0T0410 

620 CLS:K=-1 

630 FORI=DEBTOF:K=K+1 

640 G0SUB3430 

650 PL0T7,6,20;PL0T31,6,16s PL0T6,6,7:PLQT8,6, "NOTE OCT AVE DUREE" 

660 PLGT3,9+K,EF® :PL0T3,10+K,TR® 

670 PL0T1,8+K,2:PL0T2,8+K,STR® ( I) 

680 PL0T9,8+K,ND®(I):IFND*<I>="FIN"THEN740 
690 IFND*(I)="P"THEN710 

700 IFO’/. ( I ) O4THENPL0T16,8+K, STR® (07. ( I ) ) 

710 I FD7. < I ) OOTHENPLOT27,8+K, STR* <D7. ( I ) ) ELSE730 

720 YL=K+8: 0ND7. ( I ) G0SUB2400,2410,2420,2430, 2440,2450, 2460,2470 
730 IF8+K> 22THENG0SÜB3750:PL0T3,10+K,EF®:K=K-15:1 = 1 + 1 :G0T0660 
740 G0SUB3750:IFT®=CHR®(27)THENI=F 
750 NEXT:G0SUB3760:G0T0410 

755 : 

756 REM— MODIFICATION — 

757 : 

760 .CLS:F0RI = 1T010:PRINT:NEXT:P0KE#26A, 11 

770 PL0T3,O,"PROGRAMME NUMEROTE DE":PL0T8,1,"1 A "+STR®(XL) 

780 PL0T2,20,CHR®(2)+"RETOUR AU MENU EN TAF'ANT"+CHR®(1)+"0" 

790 F'RINTEV®; : INF'UT"QUELLE LIGNE " ; NL$: NL=VAL (NL$) 

800 IFXL=0THEN410 

810 IFNL<10RNL>=XLTHENPING:G0T041O 

820 CLS:G0SUB3430:PL0T6,6,1:PL0T8,6,"NOTE OCTAVE DUREE" 

830 FORI=0T09SPRINT:NEXT 
840 PRINTEVÏNL" "; 

850 FRINTND*<NL)" "; : IFND$ <NL> ="FIN"THEN910 

860 IFND$(NL)="P"THENPRINT" "; :G0T0890 

870 IF07. (NL) =40R07. (NL) =OTHENPRINT" " ; : G0T0890 

880 PRINT07. (NL) " "; 

890 IFD7. ( NL ) =0THEN910 
900 PRINTD7. (NL) 

910 PRINT: PRINT:PRINT:PRINT"MODIFICATION...":PRINT:PRINT 
920 INPUT"NOTE "; N*:GQSUB3410 

930 IFERTHENPING: PRINTCHR$(11);:G0T0920ELSEND*(NL)=N* 

940 IFN$="FIN"THEN07. (NL) =0: D7. (NL) =0: XL=XL-( XL-NL) : G0SUB3750: G0T0410 
950 IFN$= "P"THEN07. (NL) =4: G0T0980 

960 INPUT"OCTAVE " ;N: IFN>30RN< ÎTHENF'ING: PRINTCHR* (11) ; : G0T0960 
970 07. (NL)=N 

980 I NPUT "DUREE ";D: IFD<10RD>9THENF'ING: F'RINTCHR$ (11) ; :G0T0980 
990 D7. ( NL ) =D : G0SUB3750: G0T0410 

995 : 

996 REM— SUPPRESSION DE LIGNES — 

997 : 

1000 CLS:PLOTS,0,CHR$(1)+"SUPPRESSION DE LIGNES" 

1010 PL0T3,5, CHR$ (3) +" 1 —“+CHR$ (2) +"SUPF'RESSION D'UNE SEULE LIGNE" 

1020 PL0T3,10,CHR$(3)+"2-"+CHR*(2)+"SUPPRESSION DE PLUSIEURS LIGNES" 
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1030 PL0T3,15,CHR*(3)+"3—“+CHR*(2)+"MENU PRECEDENT" 

1040 GETA*: IFNOT <A*="1"0RA*="2"0RA*="3")THENPING:G0T01040 
1050 ONVAL( A* >GDT01060,1140, 410 
1060 CLS:PLGT5,10,CHR*(5)+"QUELLE LIGNE ?" 

1070 FL0T3,O,"PROGRAMME NUMEROTE DE 1 A "+STR*(XL> 

1080 PL0T2,20,CHR*(2)+"RETOUR AU MENU EN TAPANT"+CHR*(1)+"0" 

1090 X=25:YL=10:G0SUB3300 
1100 SL=VAL(NT): 1FSL=0THEN410 

1110 IFSL<1ORSL>= XLORLEN(NT)>3THENPING:GOTO1060 
1120 FORI=SLTOXL: ND*(I)=ND*(1 + 1 ) 

1130 D7. ( I ) =D7. ( 1 + 1 ) : 07. ( I ) =07. ( 1 + 1 ) : NEXT: XL=XL-1: G0SUB3750: G0T041D 
1140 CLS: PLOTS, 10, CHR* ( 1 >+" PREMIERE LIGNE" : F'LOTS, 11, CHR* < 1 ) + "A SUPPRIMER"' 
1150 PLÜI3,0,"PROGRAMME NUMEROTE DE 1 A ”+STR*(XL) 

1160 PL0T2,20,CHR*(2)+"RETOUR AU MENU EN TAPANT"+CHR*(1)+"0" 

1170 X=20:YL=11 :G0SUB3300 
l 180 PL=VAL (NT ) : l FF'L=0T HEN410 

1190 IFPL<1ORPL>=XLORLEN <NT)>3THENPING:G0SUB3770: GOTO1140 
1200 PL0T5, 15, CHR* < 1 ) +"DERNIERE LIGNE" : F'L0T5, 16, CHR* ( 1 ) + "A SUPPRIMER" 

1210 X=20:YL=16:G0SUB3300 
1220 DL=VAL(N*>:IFDL=0THEN410 
1230 IFDL> = XLORDL<2THENPING : GOTO1210 
1240 I FDL-sPLTHENP I NG : G0SUB3770 : GOTO 1140 
1250 F ORJ =OTODL—PL 
1260 FOR I =F'LTOXL 

1270 ND*(I)=ND*(1+1):NEXT:XL=XL-1:NEXT 
1280 PL0T7,23,CHR*(6)+"TERMINE":G0SUB3750:G0T0410 

1285 : 

1286 REM— CHANGE VOL,TIMBRE,TEMPO — 

1287 : 

1290 CLS:PL0T5,2,CHR*(1)+"V"+CHR* <3)+" — > CHANGER LE VOLUME" 

1300 PL0T5,5,CHR*(1)+"T"+CHR*(3)+"—> CHANGER LE TEMPO" 

1310 PLOTS,11,CHR*(1)+"M"+CHR*(3) +"—> MENU PRECEDENT" 

1320 PLOTS,8,CHR*(1)+"I"+CHR*(3)+ "—> CHANGER D'INSTRUMENT" 

1330 GETA*: :A=ASC(A*) : 1FN0T(A=860RA=840RA=770RA=73)THENPING:G0T01330 
1340 G0SUB4030 

1350 IFA=86THENPL0T2,20,"NOUVEAU VOLUME":X=20:YL=20:G0SUB3300ELSE1370 
1360 V=VAL(N*):IFV<20RV>150RLEN(N*)>2THENPING:GQT01350ELSEP0KE48D14,V 
1370 IFA=84THENPL0T2,20,"NOUVEAU TEMPO":X=20:YL=20:G0SUB3300ELSE1390 
1380 T=VAL(N*):IFT<10RT>150RLEN(N*)>2THENPING:GOTO1370 
1390 IFA=73THENG0SUB3970:X=2B:YL=23:G0SUB3300ELSE41O 
1400 IFN*=""T HENPING: GOTO139CELSEIFN* = "A"THENT1 = 1.02:GOTO1420 
1410 IFN*="B"THENT1=1.5ELSEIFN*="H"THENTI=2/3ELSEIFN*="C"THENTI=.5ELSE1390 
1420 G0SUB3750:G0T0410 
1 425 : 

1426 REM— INSERTION DE LIGNES — 

1427 : 

1430 CLS:VI=0:PLOTS,10,CHR*(2)+"INSERTION A PARTIR " 

1440 PLOTS,1,"PROGRAMME NUMEROTE":PL0T5,2,"DE 1 A"+STR*(XL) 

1450 PLOTS,11,CHR*(2)+"DE LA LIGNE —>"+CHR*(l) 

1460 PL0T3,24,"TAPEZ '0' SI VOUS RENONCEZ":PL0T3,25,"(RETOUR AU MENU) 

1470 X=30:YL=11 :G0SUB3300:DI=VAL(N*):IL=DI 
1480 IF DI=0THEN410 

1490 IFDI < 10RDI >XLORLEN ( N* ) >3THENF’ING: G0T01470 

1500 IFDI = XLTHENND* ( XL+ 1 ) =ND* (XL) : 07. ( XL+1 ) =07. < XL) : D7. ( XL+1 ) =D7. ( XL ) 

1510 YL=7:CLS 
1520 G0SUB3430 

1530 F’L0T2, 6, 7: PL0T7,6, 20: PLÜT31 ..6, 16 
1540 PLOTS,6,"NOTE OCTAVE DUREE" 

1550 YL=YL+1:VI=VI+1:PL0T3,YL+1 ,EF*:PL0T3,YL+2,TR* 

1560 IFYL>22THENG0SUB3750:PL0T3,YL,EF*:YL=7:PL0T3,YL+1,EF* 

1570 IFVI >95THENF‘L0T 1,24, CHR* ( 1 ) +CHR* < 12) + "STOP. LIMITE D'INSERTION ATTEINTE’ 
1580 FLOT1,YL,2:PL0T2,YL,STR*(DI):X=8:GÜSUB3300:G0SUB3410 
1590 IFERTHENPING:GOTO1580 

1600 NI *(VI)=N*: IFNI*(VI)="FIN"THENVI=VI-1:G0T01720 
1610 IFNI* (VI ) = "P"THENO17. ( VI ) =4: G0T01640 

1620 X=17:G0SUB3300:IFVAL(N*> <10RVAL(N*)>30RLEN(N*)71THENPING:GOTO1620 








1630 017. (VI >=VAL (N*) 

1640 X=25:G0SUB3300:IFVAL< N*)<1ORVAL(N*)>9THENPING:GOTO1640 
1650 DLJ7. (VI ) =VAL (N*) 

1660 0NDU7. < VI ) G0SUB2400, 2410,2420,2430, 2440,2450, 2460,2470 
1670 IFXL>100THENG0SUB3780 
1680 D0KE4306, #FFFF: FORI = XLTODI-1 STEF'- 1 
1690 ND* ( 1 + 1 ) =ND* ( I ) :Ü7. ( 1 + 1 ) =07. ( I ) : D7. ( 1 + 1 ) =D7. ( I > : NEXT: D0KE#306, #2710 
1700 ND* ( IL+VI-1 ) =NI* (VI ) : 07. ( IL+VI-1 ) =017. (VI ) : D7. ( IL+VI-1 ) =DU7. (VI ) : XL=XL+1 
1710 PL0T3,25,EF*:DI=DI + 1: GOTO1550 
1720 G0SUB3750:G0T0410 

1725 : 

1726 REM— ECOUTE — 

1727 : 

1730 CLS:PLOT1,10,CHR*(3)+"AVEZ—VOUS FAIT DES MODIFICATIONS" 

1740 PLOT 1,11,CHR*(3)+"AUTRE QUE LE VOLUME ?" 

1750 PLOT 10, 13, CHR* ( 1 ) + "0 / N ?" : GETR*: IFR*=”N“ANDTST>OTHEN ! MUSIC: G0T0130 
1760 IFNOT <R*="0"0RR*="N")THENPING:G0T01730 

1770 CLS:TST=1:PL0T3,10,CHR*(3)+"JE DOIS METTRE LES DONNEES" 

1780 PL0T3,11,CHR*(3J+"EN MEMOIRE ...":PLÜT3,16,CHR*(1)+"VEUILLEZ PATIENTER." 
1790 AD=#8EÜ0:D0KE4306,ttFFFF: FOR1 = 1TOXL 
1800 0NÛ7. ( 1 ) +1G0SUB2020, 2030, 2150, 2270,2390 

1810 0ND7. ( 1 ) +1G0SUB2020, 2480, 2490,2500, 2510,2520, 2530,2540, 2550 
1820 POKEAD,TEM:AD=AD+1:D0KE#306,#2710:NEXT 

1830 PLÜT7,24,CHR»(4)+"TERMINE":G0SUB3750:D0KE#2F5,#8CE6: ! MUS IC 
1840 GOTO130 
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1846 

1847 
1850 
1860 
1865 
1870 
1880 
1890 
1 900 

RE" 
1910 
1920 
1930 
1940 
1 950 
1960 
1970 

1975 

1976 

1977 
1980 
1 990 
2000 

2005 

2006 
2007 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 


REM— SAUVEGARDE — 

CLS: PRINTTR*: PRINTER*"SAUVEGARDE DU PROGRAMME" 

PRINTER*"PARTIE MACHINE ET MUSIQUE": IFXL=1THENAD=#8E00+11 
PRINTEV*"DEBUT -> #8CD0 FIN ->"HEX*<AD):PRINTTR*:PRINT 
PRINTER*"R"EM*"VITESSE RAPIDE":PRINTER*"L"EM*"VITESSE LENTE" 

PRINT:PRINTTR*:PRINT"TOUTE AUTRE TOUCHE":PRINT"RETOURNE AU MENU" 

PRINT:PRINTTR* 

F'RINT"LA SAUVEGARDE NE SE FAIT QUE SI LE" : PR INT "MORCEAU A ETE MIS EN MEMO I 

PRINT"C'EST A DIRE SI VOUS L'AVEZ ECOUTE": PRINTER*"C 3 3 AU MENU" 

PRINTTR*: PRINT:GETN*:NS=ASC(N*) 

IFNOT(NS=#520RNS=#4C)THEN130 

PLOTS,22,"QUAND VOUS ETES PRET":G0SUB3750 

IFASC(N*)=#52THEN! STOP:CSAVE"*MUSIC*",A#SCDO,EAD,AUTO 

IFASC(N*)=#4CTHEN! STOP:CSAVE"*MUSIC*",S,A#8CD0,EAD,AUTÜ 

PRINT: PRINT"TERMINE":G0SUB3750:AD=#8E00:G0T0130 


REM— FIN DE TRAVAIL — 

CLS: F'LAVO, 0,0, 0: CALLXX : P0KE#26A, 3: ! STOP 
IFPEEK(#D000)=166THENCALL#F72EELSECALL#F75F 
END 

REM— MISE EN MEMOIRE — 

DQKEAD,NJ:AD=AD+2:DOKEAD,NJ*TI:AD=AD+2: RETURN 
NJ=0:GOSUB2010:G0SUB2010:G0SUB2010:RETURN 
IFND*(I)="D0"THENNJ=477:G0SUB2010:RETURN 

IFND*(I)="DO#"ORND*(I)="REB"THENNJ=450:G0SUB2010:RETURN 
IFND*(I)="RE"THENNJ=425:G0SUB2010:RETURN 

IFND*(I)="RE#"ORND*(I)="MIB"THENNJ=4Û1:G0SUB2010:RETURN 

IFND*(I)="MI"THENNJ=379:G0SUB2010:RETURN 

IFND*(1)="FA"THENNJ=357:G0SUB2010:RETURN 

IFND*(I)="FA#"QRND*="SOLB"THENNJ=337:GÜSUB2010:RETURN 

IFND*(1)="SOL"THENNJ=318:60SUB2010:RETURN 

IFND*(I)="SOL#"ORND*<I)="LAB"THENNJ=3Ü0:GOSUB2010:RETURN 
IFND*(I)="LA"THENNJ=284:G0SUB2010:RETURN 

IFND*<I)="LA#"ÛRND*(I)="S1B"THENNJ=268:G0SUB2010:RETURN 
IFND*<I)="SI"THENNJ=253:60SUB2010:RETURN 













20, rue de Montreuil - 94300 VINCENNES - ‘2? (1) 43.28.22.06 

du mardi au vendredi : 10 h 30 à13h-15hà19h— le samedi : 10 h 30 a 19 h 

REVENDEUR OFFICIEL AGRÉÉ ORIC-FRANCE 



Il ne lui manque que la parole', synthé. V0C1 la lui donne ! 
Très performant ce synthétiseur vocal va vous permettre 
de rendre votre ordinateur plus bavard qu'un politicien en 
campagne ! c 50 c 

□ synthétiseur vocal 



MODEM 

Votre ORIC s'ouvre sur l'extérieur. Il 'discute' 
avec ses semblables et accède au réseau 'minitel' 

Fourni avec interface intégrée et logiciel 
□ modem DIGITELEC 1490 F 



□ moniteur couleur. 


2490 F 











Interface tous jeux 

Grèce à cet interface programmable vous utili¬ 
serez vos joysticks avec tous vos logiciels de |eux 
□ interface tous jeux 360 F 


Rallonge Péritei 

Ne soyez plus 'collé' à ( écran ! 
rallonge 95 F 



Interrupteur 
Ne courrez plus le risque de faire sauter la ROM 
□ interrupteur d'alimentation 85 F 



Imprimante CITIZEN 1200 

120 CPS matrice 9x9- traction ou friction jusqu'à 
3 ex compatible EBSON - garantie 2 ans interface cen 
ironie intégrée. 

Particulièrement bien adaptée à l'Amstrad cette imprimante 
vous donnera toutes satisfactions ! Compatible avec, la plu 
part des logiciels de copie d’écran du commerce elle accepte 
egalement les caractères graphiques 
□ imprimante CITIZEN 120 0 2490 F 



JASMIN 2 

Le lecteur de disquette que votre Oric préfère 
Permet, entre autres, de recopier sur disquettes 
les logiciels (même plombés) sur cassette 

□ lecteur double tète 2.490 F 



□ atmos 


990 F 


Magnétophone 

Ce magnétophone spécialement conçu pour les 
micro-ordinateurs vous évitera bien des soucis 
Entrée OIN ou Jack Niveau réglable Témoin 
sonore et lumineux. Alimentation intégrée 
O magnétophone 360 F 



PROMOTION 

logiciel ORIC 1 exclusivement 

pour 2 titres : 145 F pour 3 titres :195 F pour 4 titres : 220 F pour 5 titres : 250 F 


□ carnet d'adresses 

□ trace dump 

□ black base 

□ oric gestion 

□ oric mmd 

□ yam 

□ guerre des couleurs 

□ genear 

□ ciros 

□ fromage 

□ caractoi 


□ jogger 

□ calorie 

□ le lièvre et la tortue 

□ le monde animal 

□ hunchback 

□ la chenille infernale 

□ morpion 

□ dicodoric 

□ zig zag 

□ achetons rage 

□ ice giant 

LOGICIELS CASSETTE 


□ mushroom mania 

□ centipède 

□ gastronon 

□ oric munch 

□ facturation 

□ ultima zone 

□ pengoric 

□ finances 

□ copy écran (pour GP 100) 

□ calculus 

□ super break oui 


□crocky 

120 F 

i_i dedal 

110F 

□ colossal adventure 

130F 

□ carmamac 

110F 

□ digger 

100 F 

□ mots croisés 

120F 

□ arsène lapin 

115F 

□ dossier G 

140 F 

□ monopolic 

140F 

□ annuaire 

120F 

Dèlysee 

145F 

□ nessy 

95 F 

□ waydor 

105 F 

□ flipper 

140 F 

□ moniteur 1 0 

140F 

□ 1815 

160 F 

□ images (DA O ) 

130F 

□ polyfichier 

180F 

□ 3 0fongus 

140F 

□ gestion stock 

145 F 

□ R D V. de le terreur 

95 F 

□ 3 D maze 

100 F 

□ la général 

120F 

□ rat splat 

105 F 

□ 3 D munch 

140 F 

□ frelon 

120F 

□ retour du docteur gemus 160 F 

□ big baston 

125 F 

□ lancelot 

100 F 

□ tendre poulet 

120F 

□ assombl symbolique 

150 F 

□ godilloric 

90 F 

□ oric base 

115F 

□ atlantid 

120F 

□ intox ei zoé 

180 F 

□ tic tac 

95 F 

□ atlandis 

140F 

□ karaté 

99 F 

□ reverse 

90 F 

□ basic français 

180F 

□ l'aigle dor 

180 F 

□ s.a.g.a 

150 F 

□ basic turbo 

140 F 

□ la cité maudite 

140 F 

□ stress 

120F 

□ brique à brac 

90 F 

□ lediamantdel’îlemaudite 160 F 

□ teknis 

120F 

□ bidget familial 

135F 

□ la manoir du 


□ tortue logic 

150F 

□ business man 

140 F 

docteur gemus 

140 F 

□ triathlon 

150F 

□ calcul mental 

120F 

□ le millionnaire 

120 F 

□ trick shot 

•mf 

□ catégorie 

95 F 

□ la mystère du kikekankoi 180 F 

□ une affaire en or 

145F 

□ challenger 

130 F 

□ le tour du monde en 


□ vision 

120F 

□ insect msanrty 

100 F 

80 jours 

180 F 

□ world war 3 

95 F 

□ dracula's revenge 

110F 

□ la trésor du pirate 

95 F 

□ xénon 1 

100 F 

□ l'apprends ranglais 

125F 

□ Tété sera chaud 

115F 

□ xénon 3 

105 F 

□ cheops 

140 F 

□ zodiac 

95 F 

□ zorgon s revenge 

105F 

□ citadelle 

125F 

□ lone raider 

115F 

□ pasta blasta 

100 F 

□chess 

125 F 

□ logo VI. 0 

295 F 

□ basic étendu 

120F 

□ cobra 

55 F 

□ longraph 

290 F 

□ gest (gest bancaire) 

130F 

□ cobra pmball 

140 F 

□ lontel 

395 F 

□ j'apprends CAO 

150F 

□ colorie 

95 F 

□ macadam bumper 

160 F 

□ caspak 

100F 

□ compilateur graphique 

250 F 

□ master paint 

250 F 

□ ultima zone 

100F 

□ dam buster 

105F 

□ thé ultra 

105 F 

□ canni-balle 

105 F 

□ détective story 

150 F 

□ trouble in store 

115F 




LIVRES 


LOGICIELS DISQUETTE (JASMIN) 



□ guide pratique 

78.50 F 

□ assembleur 

490 

□ découverte de Toric 

95 F 

□ easy text 

590 

□ oric à r affiche 

95 F 

□ muttifich 

590 

□ oric atmos pour tous 

105 F 

□ cale 

590 

□ 52 prog pour tous 

105 F 

□ forth 

590 

□ l'assembleur de Catmos 

95 F 

□ jasmitel 

490 

□ interfaces pour oric 

59 F 

. ’ mathégraph 

249 

□ Toric à nu 

150F 

□ finanças 

219 

□ programmes en lang. mach 

95 F 

LJ conquérants 

219 

□ manuel référence tome 1 

□ manuel référence tome 2 

138 F 
120F 

□ zonga 

199 


L'IMPRIMANTE PERSONNELLE 
COULEUR "OKIMATE 20" 

L OKIMATE 20 est la première imprimante per 
sonnelle dans sa gamme de prix à offrir une 
véritable impression couleur Une tète d impres 
sion à 24 éléments crée plus de 100 nuances d'une 
définition et d une netteté exceptionnelles 
Interface centromc 

okimate 20 2950 F 


Imprimante MCP 40 

L'imprimante 4 couleurs aux couleurs d'ORIC I 
□ imprimante MCP 40 990 y 


Cassettes vierges C20 

□ les 5. 

□ les 10 

□ disquette vierge 3 pouces 


iiüIE] 



45 F 
80 F 

35 F 


Câble Imprimante 

Vous permet de connecter votre Oric à n'importe 
quelle imprimante au standard 'centromc* 

□ câble imprimante ISO F 

Câble Moniteur 

Pour brancher votre Oric à un moniteur mono 
chrome 

□ câble moniteur 95 f 



TELESTRAT 

La télématique à la portée de tous ! 

Puissant (64 K), doté d'un basic 'costand' (plus de 250 
instructions), compatible ATMOS ou ORIC (par cartouche), 
accompagné d'un lecteur de disquette double tète (400 K) 
le TELESTRAT est déjà ainsi un ordinateur 'top niveau' I 
A|outez-y toutes les ressources télématiques qu'il est capable 
de gérer sans interface, câble ou logiciel supplémentaire puis 
que le TELESTRAT est le seul ordinateur où toutes les fonc¬ 
tions 'MINITEL' sont intégrées d'origine et vous comprendrez 
que le TELESTRAT c'est l'ordinateur de demain disponible 
dès aujourd'hui I 


□ TELESTRAT 


□ souris 

□ cartouche ROMATMOS 

□ cartouche ROMORIC1 


3990 F 
490 F 
200 F 
200 F 




TIRVITT 2 

Esthétique, robuste, pratique le TIRVITT 2 vous séduira 1 
Contacts par micro switches. un contacteur sous le 
socle permet le choix 4 ou 8 directions 
□ TIRVITT 2 .150 F 


NOUVEAU 



modèle 


Le 'must' pour les amateurs de graphisme Utilisée 
par la majorité des créateurs de logiciel cette tablette 
vous séduira par sa simplicité d'utilisation et la qualité 
'top niveau' des résultats obtenus (ex. options faire 
des points, traits, boîtes, cercles, texte, remplir, 'zoom*. ) 
□ graphiscop.990 F 



□ bloc alim ORIC 160 F 

□ alim. 12 V pour péntel. 75F 

□ stylos pour MCP 40 (les 4) 49 F 

□ rouleaux papier MCP 40 (par 2) ... 60 F 

□ rallong de bus 1 Slot.110 F 

ŸftOtjo / 7 - - 7 ~ 1 \ 



Imprimante Smith Uorona Fastext 80 
80 caractysec. impression bidirectionnelle, 
entrainement par friction, mterf contromc. buffer 
intégré, écriture normale ou condensée 


COMMENT COMMANDER : Je possède: DORICI DATMOS 

Coche) lois) anidelsl désrrélsl ou faites en une liste sur une feudle à part - Fartes le total + frais de port (20 F pour achats inférieurs à 500 F. 40 F de 500 à 1000 F, 60 F pour tout achat supérieur a 1000 F) 

NOM : _ PRÉNOM :_ TEL :_ 

ADRESSE : _CODE POSTAL : _VILLE : _ 


Mode de paiement : □ chèque □ mandat □ contre-remboursement (prévoir 20 F de frais) 

envoyer le tout à : ORDIVIDUEL 20, aie de Montreuil 94300 VINCENNES réseau kld-jfcEl 


Tout no* pru tonl indicatifs «1 ta (onction do* stocks 
























































PETITES ANNONCES 


La place réservée aux petites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, lea peti¬ 
tes annonces farfelues sont systématique¬ 
ment rejetées... De même, comme il est peu 
probable qu'il existe des "généreux dona¬ 
teurs" de matériels ou de logiciels, les peti¬ 
tes annonces faisant appel è ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

Seront refusées toutes les annonces visant 
à vendre ou échanger des listes ou copias de 
logidals non garantis "d'origine", ainsi que 
toute annonce Incitant au piratage. 

En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 

Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho¬ 
tocopiés), le texte étant rédigé è raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbras ne sera pas insérée 

Urgent, vends Jasmin ♦ 12 disquettes 1200 logi 
ciels) : 2000 F. Vends ATMOS + 50 |eux : 700 F 
I r livres). Jérôme au 48 74 49.86 

Urgent 1 Cherche interface prog joystick pour 
ATMOS. environ 300 F. L. DIDIER. 429 cours E 
Zola. 69100 VILLEURBANNE 

Cherche notice Loritel. Faire offre à Vincent, 405 
rue Ecoles. 73230 ST. ALBAN LEYSSE 

Vends LM + : 80 F. Formule 1 : 100 F Meurtre à 
Grande Vitesse : 140 F. Carmaniac : 60 F. Pengo 

Vends ATMOS 48 k ♦ magnéto + livres + revues 
jeux 1000 F. F. GEEREBAERT. 6 rue A. Rous 
sel. 78370 PLAISIR Tél.: 30.54.04 40 

Réc poss. Téléstrat pour et uo possi. réelles. Tél.: 
59 55 66 55/59.52.95.50 Corres UTOPIA 
Manual Vila, 7 rue Denis Etcheverry. 64100 
BAYONNE 

Vends ATMOS + JASMIN 2 (4 mois) *■ livres 
(dont le T DOS) + 7 disquettes Tél : 75 08 12 82 
après 18h. François BUFFIERE. 


rie 90 F Wimpy 90 Challenge Voile 100 F. 
Le Millionnaire 80 F P GUERRIN. 38 rue A Gui 
don. BELFORT 

Echange schémas ♦ doc. ext. ORIC (mém. vive ♦ 
morte, modem E/S), contre logiciels sur disque Jas 
min. Tél. 96.23.70.61 (après 18h) 

Vends ATMOS + moniteur mono ♦ microdisk + 
mt. joystick + jeux (nbx) + livres + cordons. 
Valeur : ♦ de 5000 F. cédé à 4000 F Tél. Sté 
phane au 34.19.34.86 

Vends collection THEORIC 1 à 22 collection MHZ. 

1 à 42 au plus offrant. Tél. 42.64 89 16 Pans 

Vends ATMOS ♦ lecteur Jasmin ♦ disquettes ♦ 

2 joysticks ♦ interface? + revues THEORIC. Le 
tout . 2500 FF M SPANIER. 12 rue Verlaine. 
57120 ROMBAS 

Echange programmes (disquettes Jasmin) contre 
singerie, autres soft ou ampli bus Jasmin Yann LIE 
BAERT. tél 28 68.35 91. 

Vends ATMOS + modulateur (N/B) + télé -f imp. 

♦ 15 jeux disquette ♦ Microdisc ♦ K7 + magnéto 

♦ modem 5300 F à débattre. Tél. 45.86.96.60 
Rodrigue. 

Recherche livre "Communiquez avec votre ORIC" 
Faire offre à T. WULFRANCK. 26 rue des Aubépi 
nés. 28500 GARNAY. tél. 37.46.37 83. 


Cherche Ampli-bus. P. CANALS. 6 rue Rimbaud. 
36000 CHATEAUROUX. tél 54.27.64 17 après 
18h30 

Vends ORIC-ATMOS 48 K -f Sédoric + 50 jeux, 
env. sur disque et sur cassette + 20 THEORIC + 
magnéto + 10 livres, tbe. etc. Tél. 78.93.35.12 
après 19h. 

Vends lecteur disquettes Jasmin 2. nbx program 
mes 1 900 F Imprimante GP 100 Mark II : 1500 F 
Les 2 tbe. Tél 49 81 98.71 

Vends MCP 40 500 F. Joystick ♦ interface pro 
grammable 250 F. Tél. (1) 42 40 10.72 (soir) 

Echange : Jeu Vectrex + 3 K7 contre MCP 40 ♦ 
câble -f papier ♦ stylo (le tout en état). Deman 


der Daniel GRIMAULT au 46 87 82 85 

Vends/échange adapt prog commerce sur Jasmin 
et nouv. ROMs spéciales V2.0 et V2.1 + notice 
pour ORIC/ATMOS J. GOTHIE. tél. 79.37 44.35. 

Vends Jasmin 2 + nbx logiciels sur disquettes M 
COLLIN, tél. (1) 47 66 89 77. 

Vends moniteur mono orange, carosserie beige + 
cordon + logiciels Atmos Chess II + Zodiac : 
970 F. Tél. 46 81 08 89. 

Vends ATMOS 48 K ♦ magnéto neuf -f livres ♦ 
80 jeux + cordons peu servi : 1600 F. Tél 
21 49 19 02. demander Franck. 

Urgent : Vends ORIC/ATMOS neuf ♦ lecteur K 7 
+ câbles ♦ 30 logiciels ♦ livres: 1500 F (à débat 
tre). Tél : 62.39.71 41. demander Stéphan. 

Vends machine à écrire électronique Brother EP 22 
(mat 5x71 utilisable imprimante via RS 232 
(75/300 baudsl. Tél. (1) 47 88.02.81 le soir. 

Cherche listings astronomie pour Casio PB 100 ou 
pour ATMOS S’adresser à Nicolas CHARLES, 12 
rue Marchadiale. 15300 MURAT. 

Vends ATMOS 1985 ♦ péritel + int. N/B ♦ cor 
dons magnéto ♦ livre K7 : 1815. Tyrann. 
Defense Force, etc ( 13 ♦ I 900 F â débattre. Tél. 
48 75.43.31 

Vends ATMOS janvier 85 + magnéto + K7 (jeux 
utilitaires) *■ livres revues (THEORIC) . tout 
en tbe pour une valeur de 6000 F, laissé à 2500 F 
à débattre. Contacter Laurent SELMO. tél 
73 33.20 34 

ATMOS recherche contacts pour échange divers 
Ecrire à Franck DUPONT. Chemin du Pont de 
Jeanne d'Arc. 77144 MONTEVRAIN. 

Vends ORIC 1 64 K complet et révisé avec câbles 
et 50 livres + K7 ( 15) : 2000 F. J.m BLEU. Le Flore. 
B1. Av Martyrs Résistance, 06600 ANTIBES. 

Vends carte extension 64 K Phoenix avec manuel 
K7 et cordon F2 300 F. M. SERNAB. 30 rue G. 
Paymal. 92110 CICHY. tél. 47.37.31 94 le soir 


j A N N O N C É Z - VO U S ! 

les petites annonces et les messages 



jç Coupon à renvoyer accompagné de 3 timbres à 2,20 F à : 

*- SORACOM, La Haie de Pan, 35170 BRUZ 

-=>«g. 


50 









































NOUVFAUTÉS 

Electronique sur AMSTRAD 

P BEAUFILS 


95 F 


W, 


. mx»'" s 

PilTIV 


l’Wrrv 


lUri' 


oï'stt U»«» U 


éditions 


COLLECTION 


POCHE 


TECHNIQUE 

Propagation des ondes, tome 1 

Serge CANIVENC, F8SH 

Un univers à découvrir 165 F 

Propagation des ondes, tome 2 

Serge CANIVENC, F8SH 

Cet ouvrage, encore plus important, 

traite de tous les modes de 

propagation en UHF 253 F 

Technique de la BLU - 2 e édition 

G. RICAUD, F6CER 

Approche pratique de la BLU 95 F 

Synthétiseurs de fréquence 
M. LEVREL 

Se familiariser avec les 

nouvelles techniques 125 F 

Interférences radio - des solutions 

F. MELLET et K. PIERRAT 

Dus solutions à vos problèmes 

de brouillage 35 F 

Télévisions du monde 

P. G000U 

Un catalogue de mires 

et une longue expérience 

iras à votre disposition par 

l'auteur 110 F 


Jouez avec Hector 


145 F 


Le radioamateur et la carte QSL 

Préfixes et QSL managers et 
bureaux uans le monde 
72 pages 

QSO en radiotéléphonie 
français anglais 
L. SIGRAND' 

Un aide mémoire pour 
des QSO plus faciles 
Cours de lecture au son 
Les cassettes avec livret 
La réception des satellites météo 
Loïc Kuhlmann 
Photos, schémas, montages 
Comment réaliser une station 
MEGAHERTZ broché n" 3 
(de 14 à 19) 

OFFRE SPECIALE 35 F. 

Nouveau traité de radiocommunication 

J.M ROGER 162 


INFORMATIQUE 

Communiquez avec votre ZX81 
E, OUTERTRE et D. B0N0M0 
Programmes et interfaces 
2 e édition 90 F 

Communiquez avec ORIC 1 et ATMOS 
E. OUTERTRE, 0. B0N0M0 145 F 

Mystères du Laser 
Denis BOURQUIN 

Connaître à fond sa machine 148 F 

Mystères d'Alice ou la pratique du 6803 
A. B0NNEAU0 

Connaître à fond sa machine 151 F 

Mieux programmer sur ATMOS 
M. ARCHAMBAULT 
Tout un programme 110 r 

Interfaces pour ORIC 1 et ATMOS 

M. LEVREL 

Rendre son ORIC encore plus 

performant 59 F 

Apprenez l’électronique sur ORIC ATMOS 

P BEAUFILS 

Mieux voir les phénomènes électroniques 110 F 

Communiquez avec AMSTRAD 
0 B0N0M0 et E. DUTERTRE 90 F 

Mieux programmer sur AMSTRAD 

M. ARCHAMBAULT 85 F 



E. DUTERTRE 

48 F 


Jouez avec Aquarius 

L. GENIY 

45 F 


Extensions du ZX81 

E. DUTERTRE 

48 F 

15 F 

Jouez avec AMSTRAD 

KERLOCH 

48 F 


MEGAHERTZ Hors Série 

Informatique 

30 F 

25 F 

Transat Terre Lune 

Préface de 0. BAUDRY 

20 F 

195 F 

Manœuvre du catamaran 

SEGALA 

de croisière 

45 F 


Jouez avec M05 

E. DUTERTRE 

Collection poche 

40 F 


Plus loin avec le X07 

Michel GANTIER 

Un titre pour un programme 1 


LES REVUES DU GROUPE 
Exemplaires de presse 


MEGAHERTZ 

Le numéro 

(Mensuel) Abonnement 1 an 

CPC Revue AMSTRAD 

Le numéro 

(Mensuel) Abonnement 1 an 

THEORIC Revue ORICIATMOS 

Le numéro 

(Mensuel) Abonnement 1 an 

OUEST INFO MAGAZINE 

Le numéro 

(Bimestriel) Abonnement 1 an 
AMSTAR La revue des jeunes 
Le numéro 8,50 + 5 F de port 


18 F 

179 F 

19 F 

180 F 

25 F 
235 F 

15 F 
80 F 



85 F 


Réédition des programmes du livre 

Communiquez avec votre ZX81 ... 150 F 

Cassette programmes 

Communiquez avec AMSTRAD . . . 190 F 

Disquette programmes 

Communiquez avec AMSTRAD . . . 250 F 

Cassette programmes 

Communiquez avec ORIC et ATMOS 190 F 

VERSION ORIC 1 

Adressez vos commandes à : 
SORACOM, La Haie de Pan, 
35170 BRUZ 

(Règlement comptant à la 
commande + port 10 %). 






ENFIN DISPONIBLE ! 


Nous vous l'annoncions depuis longtemps 
Vous l'attendiez impatiemment. 
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LE LIVRE 
QUE TOUT 
PROGRAMMEUR 
T 0(/f AVANCE 

DOIT POSSEDER 


mm 


Prix : 151 F + 9 F de port. 


La Haie de Pan' 
35170 BRUZ 


